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PREFACE 

The Altair BASIC language is a high-level programming 
language specifically desianed for interactive computing 
systems. Its simple English-like instructions are easily 
understood and cruickly learned and its interactive nature 
allows instant feedback of results and diagnostics. Despite 
its simplicity, however , Altair BASIC has evolved into a 
powerful language with rarovisions for editing and string 
processing as well as numerical computation. 

The Altair BASIC interpreter reads the instructions of 
the BASIC language and directs the ALTAIR 8800 series 
microcomputer to execute them. Altair BASIC includes many 
useful diagnostic and editing features in all versions. The 
extended versions provide additional features including 
comprehensive file input/output orocedures in the disk 
version. 

This manual will explain the features of the BASIC 
language and the special provisions of the 4K, 8K, Extended 
and Disk Extended Altair BASIC interpreters, release 4.1. For 
quick reference, a table of Altair BASIC instructions., 
diagnostics and functions are provided in Section 6. A 
complete index is at the end of the manual. 
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.Li SOME INTRODUCTORY REMARKS 
1-1 Introduction to this Manual . 

a. Conventions. For the sake of simplicity, some 
conventions will be followed in discussing the features of the 
Altair BASIC language. 

1. Words printed in capital letters must be written exactly 
as shown. These are mostly names of instructions and 
commands. 

2. Items enclosed in angle brackets (<>) must be supplied as 
explained in the text. Items in square brackets ([]) are 
optional. Items in both kinds of brackets, [<W>] , for 
example, are to be supplied if the optional feature is used. 
Items followed by dots (...) may be repeated or deleted as 
necessary. 

3. Shift/ or Control/ followed by a letter means the 
character is typed by holding down' the Shift or Control key 
and typing the indicated letter. 

4. All indicated punctuation must be supplied. 

b. Definitions. Some terms which will become important 
are as follows: 

Alphanumeric character: all letters and numerals taken 
together are called alphanumeric characters. 

Carriage Return: Refers both to the key on the terminal 
which causes the carriage, print head or cursor to move to' the 
beginning of the next line and to the command that the 
carriage return key issues which terminates a BASIC line. 

Command Level: After Altair BASIC prints OK, it is in 
the command level. This means it is ready to accept commands. 

Commands and Statements: Instructions in Altair BASIC 
are loosely divided into two classes, Commands and Statements. 
Commands are instructions normally used only in direct mode 
(see Modes of Operation, section 1-2). Some commands, such as 
CONT, may only be used in direct mode since they have no 
meaning as program statements. Some commands, such as DELETE, 
are not normally used as program statements because they cause 
a return to command level. But most commands will find 
occasional use as program statements. Statements are 
instructions that are normally used in indirect mode. Some 
statements, such as DEF, may only be used in indirect mode. 

Edit: The process of deleting, adding and substituting 
lines in a program and that of preparing data for output 
according to a predetermined format will both be referred to 
as ''editing." The particular meaning in use will be clear from 
the context. 
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Integer Expression: An expression whose value is 
truncated to an integer. The comoonents of the expression 
need not be of integer type. 

Reserved Words: Some words are reserved by BASIC for use 
as statements and commands. These are called reserved words 
and they may not be used in variable or function names. 

Special Characters: Some characters appear differently 
on different terminals. Some of the most important of these 
are the following: 

(carat) appears on some terminals as f (up-arrow) 
~ (tilde) does not appear on some terminals and orints 

as a blank 
_ (underline) appears on some terminals as -*-( back-arrow) . 

String Literal: A string of characters enclosed by 
quotation marks' (") which is to be inout or output* exactly as 
it appears. The quotation marks are not part of the string 
literal, nor may a string literal contain quotation marks. 
(""HI, THERE""is not legal.) 

Type: While the actual device used to enter information 
into the computer differs from system to system, this manual 
will use the word "type" to refer to the process of entry. 
The user types, the computer prints. Tytse also refers to the 
classifications of numbers and strings. The meaning will be 
clear from the context. 



1-2 Modes of Operation. 



Altair BASIC provides for operation of the computer in 
two different modes. In the direct mode, the statements or 
commands are executed as they are entered into the computer. 
Results of arithmetic and logical operations are displayed and 
stored for later use, but the instructions themselves are lost 
after execution. This mode is useful for debugging and for 
using Altair BASIC in a "calculator" mode "for quick 
computations which do not justify the design and coding of 
complete programs. 

In the indirect mode, the computer executes instructions 
from a program stored in memory. Program lines are entered 
into memory if they are preceded by a line number. Execution 
.of the program is usually initiated by the RUN command. 
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1-3 Formats. 



a. Lines - AUTO and RENUM. The line is the fundamental 
unit of an Altair BASIC program. The format for ah Altair 
BASIC line is as follows: 

nnnnn <3ASIC statement> [ :<BASIC statements..] 

Each Altair BASIC line begins with a number. The number 
corresponds to the address of the line in memory and indicates 
the order in which the statements in the line will be executed 
in the program. It also provides for branching linkages and 
for editing. Line numbers must be in the range to 65529. A 
good programming practice is to use an increment of 5 or 10 
between successive line numbers to allow for insertions. 

1) Line numbers may be generated automatically .in the 
Extended and Disk versions of Altair BASIC by use of the AUTO 
and RENUM commands. The AUTO command provides for automatic 
insertion of line numbers when entering program lines. The 
format of the AUTO command is as follows: 

AUTO[<initial line> [ , [<increment>] ] 
Example; 

"AUTO 100,10 
100 INPUT X,Y 
110 PRINT SQR(X"*2+Y~2) 
120 "C 
OK 

AUTO will number every input line until Control/C is typed. 
If the <initial line> is omitted, it is assumed to be 10 and 
an increment of 10 is assumed if <increment> is omitted. If 
the <initial line> is followed by a comma but no increment is 
specified, the increment last used in an AUTO statement is 
assumed . 

If AUTO generates a line number that already exists in 
the program currently in memory, it prints the number followed 
by an asterisk. This is to warn the user that any input will 
replace the existing line. 

2) The RENUM command allows program lines to be "spread 
out" so that a new line or lines may be inserted between 
existing lines. The format of the RENUM command is as 
follows: 

RENUM [<NN>[,<MM>[,<II>]]] 

where NN is the new number of the first line to be 
reseauenced. If omitted, NN is assumed to be 10. Lines less 
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than MM will not be renumbered. If MM is omitted, the whole 

program will be resequenced. II is the increment between the 

lines to be resequenced. If II is omitted, it is assumed to 
be 10. Examoles: 

RENUM Renumbers the whole program to start at line 10 
with an increment of 10 between the new line numbers. 

RENUM 100,, 100 Renumbers the whole program to start 
at line 100 with an increment of 100. 

RENUM 6000,5000,1000 Renumbers the lines from 5000 uo 
so they start at 6000 with an increment of 1000. 



NOTE 

RENUM cannot be used to change the order of program 
lines (for example, RENUM 1.5,30 when the proaram has 
three lines numbered 10, 20 and 30) nor to create line 
numbers greater than 65529. An ILLEGAL FUNCTION CALL 
error will result.. 



All line numbers appearing after a ' GOTO, G0SU3, THEN, 
ON... GOTO, ON...GOSUB and ERL<relational operator> will be 
properly changed by RENUM to reference the new line numbers. 
If a line number appears after one of the statements above but 
does not exist in the program, the messacre "UNDEFINED LINE 
XXXXX IN YYYYY" will be printed. This line reference (XXXXX) 
will not be changed by RENUM, but line number YYYYY may be 
changed. 

3) In the Extended and Disk versions, the current line 
number may be designated by a period (.) anywhere a line 
number reference is re-quired. This is particularly useful in 
the use of the EDIT command. See section 5-4. 

4) Following the line number, one or more BASIC 
statements are written. The first word of a statement 
identifies the operations to be performed. The list of 
arguments which follows the identifying word serves several 
purposes. It can contain (or refer symbolically to) the data 
which is to be operated upon by the statement. In some 
important instructions, the operation to be performed depends 
upon conditions or options specified in the iist. 

Each type of statement will be considered in detail in 
sections 2, 3 and 4. 
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More than one statement can be written on one line if 
they are separated by colons (:). Any number of statements 
can be joined this way provided that the line is no more than 
72 characters long in the 4K and 8K versions or 255 characters 
in the Extended and Disk versions. In the Extended and Disk 
versions, lines may be broken with the LINE FEED key. 
Example: 

100 IF X<Y+37<line feed> 
THEN 5 <line feed> 
ELSE PRINT(X) <carriage return> • 

The line is shown broken into three lines, but it is input as 
one BASIC line. 

b. REMarks. In many cases, a program can be more easilv 
understood if it contains remarks and explanations as well as 
the statements of the program proper. In Altair BASIC, the 
REM statement allows such comments to be included without 
affecting execution of the program. The format of the REM 
statement is as follows: 

REM <remarks> 

A REM statement is not executed by BASIC, but branching 
statements may link into it. REM statements are terminated by 
the carriage return or the end of the line but not bv a colon. 
Example: 

100 REM DO THIS LOOP: FOR I=1TO10 -the FOR statement 

will not be executed 

101 FOR 1=1 TO 10: REM DO THIS LOOP -this FOR state- 

ment will be execu- 
ted. 

In Extended and Disk versions, remarks may be added to the end 
of a program line separated from the rest of the line by a 
single quotation mark ('}. Everything after the single quote 
will be ignored. 

c. Errors. When the BASIC interpreter detects an error 
that .will cause the orogram to be terminated, it prints an 
error message. The error message formats in Altair BASIC are 
as follows: 

Direct statement ?XX ERROR 
Indirect statement ?XX ERROR IN nnnnn 

XX is the error code or message (see section 6-5 for a list of 
error codes and messages) and nnnnn is the line number where 
the error occurred. Each statement has its own particular 
possible errors in addition to the general errors in syntax. 
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These errors will be discussed in the description of the 
individual statements. 



1-4. Editing - Elementary provisions. 

Editing features are provided in Altair BASIC so that 
mistakes can be corrected and features can be added and 
deleted without affecting the remainder of the program. If 
necessary, the whole program may be deleted. Extended and 
Disk Altair BASIC have expanded editing facilities which will 
be discussed in section 5. 

a. Correcting Single Characters. If an incorrect 
character is detected in a line as it is being typed, it can 
be corrected immediately with the backarrow ( , underline on 
some terminals) or , except in 4K, the RUBOUT key. Each stroke 
of the key deletes the immediately preceding character. If 
there is no preceding character, a carriage return is issued 
and a new line is begun. Once the unwanted characters are 
removed, they can be replaced simply by typing the rest of the 
line as desired. 

When RUBOUT is typed, a backslash (\) is printed and then 
the character to be' deleted. Each successive RUBOUT prints 
the next character to be deleted. Typing a new character 
prints another backslash and the new character. All 
characters between the backslashes are deleted. 

Example: 

100 x=\=X\Y=10 Typing two RUBOUTS deleted the '=' 

and 'X' which were subsequently 
replaced by Y= . 



b. Correcting Lines. A line being typed may be deleted 
by typing an at-sign (@) instead of typing a carriage return. 
A carriage return is printed automatically after the line is 
deleted. Except in 4K, typing Control/U has the same effect. 

In the Extended and Disk versions, typing Control/A 
instead of the carriage return will allow all the features of 
the EDIT command (except the A command) to be used on the line 
currently being typed. See section 5-4. 

c. Correcting Whole Programs. The MEW command causes 
the entire current program and all variables to be deleted. 
NEW is generally used to clear memory space preparatory to 
entering a new program. 
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2. EXPRESSIONS AND STATEMENTS. 



2-1. Expressions. 



The simplest BASIC expressions are single constants, 
variables and function calls. 

a. Constants. Altair BASIC accepts integers or floating 
point real numbers as constants. All but the 4K version of 
Altair BASIC accept string constants as well. See section 
4-1. Some examples of acceptable numeric constants follow: 

123 
3.141 
0.0436 
1.25E+05 

Data input from the terminal or numeric constants in a program 
may have any number of digits up to the length of a line (see 
section l-3a) . In 4K and 8K Altair BASIC, however, only the 
first 7 digits of a number are significant and the seventh 
digit is rounded up. Therefore, the command 

PRINT 1.234567890123 

produces the following output: 

1.23457 
OK 

In Extended and Disk versions of Altair BASIC, double 
precision format allows 17 significant digits with the 17th 
digit rounded up. 

The format of a printed number is determined by the 
following rules: 

1. If the number is negative, a minus sign (-) is printed to 
the left of the number. If the number is positive, a 
space is printed. 

2. If the absolute value of the number is an integer in the 
range to 999999, it is printed as an integer. 

•3. If the absolute value of the number is greater than or 
equal to .01 and less than or equal to 999999, it is 
printed in fixed point notation with no exponent. 

4. In Extended and Disk versions, fixed point values up to 
9999999999999999 are oossible. 
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5. If the number does not fall into categories 2, 3 or 4, 
scientific notation is used. 

The formats of scientific notation are as follows: 

SX.XXXXXESTT single precision 

SX.XXXXXXXXXXXXXXXDSTT double precision 

where S stands for the signs of the mantissa and the exponent 
(they need not be the same, of course) , X for the digits of 
the mantissa and T for the digits of the exponent. E and D 

may be read "...times ten to the power " Non-significant 

zeros are suppressed in the mantissa, but two digits are 
always printed in the exponent. The sign convention in rule 1 
is followed for the mantissa. The exponent must be in the 
range -38 to +38. The largest number that may be represented 
in Altair BASIC is 1.70141E38; the smallest positive number 
is 2.9387E-38. The following are examples of numbers as inout 
and as output by Altair BASIC: 



Number 


Altair BASI 


+1 


1 


-1 


-1 


6523 


6523 


1E20 


1E20 


-12.34567E-10 


-1.23456E-09 


1.234567E-7 


1.23457E-07 


1000000 


1E+06 


.1 . 


.1 


.01 


.01 


.000123 


1.23E-04 


-25.460 


-25.46 



The Extended and Disk versions of Altair BASIC allow 
numbers to be represented in integer, single precision or 
double precision form. The type of a number constant is 
determined according to the following rules: 

1. A constant with more than 7 digits or a 'D' instead of '£' 
in the exponent is double precision. 

2. A constant outside the range -32768 to 32767, with 7 or 
fewer digits and a decimal point or with an 'E' exponent 
is single precision. 

3. A constant in the ranqe -32768 to 32767 and no decimal 
point is integer. 
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4. A constant followed by an exclamation point (!) is single 
precision; a constant followed by a pound sign (#) is 
double precision. 



Two additional types of constants are allowed in Extended 
and Disk versions of Altair BASIC. Hexadecimal (base sixteen) 
constants may be explicitly designated by the symbol &H 
preceding the number. The constant may not contain any 
characters other than the digits - 9 or letters A - F, or a 
SYNTAX ERROR will occur. Octal constants may be designated 
either by SO or just the & sign. 

In all formats, a space is printed after the number. In 
all but the 4K version, Altair BASIC checks to see if the 
entire number will fit on the current line. If not, it issues 
a carriage return and prints the whole number on the next 
line. 



b. Variables. A variable represents symbolically any 
number which is assigned to it. The value of a variable may 
be assigned explicitly by the programmer or may be assigned as 
the result of calculations in a program. Before a variable is 
assigned a value, its value is assumed to be zero. In 4K , a 
variable name consists of one or two characters. The first 
character is any letter. The second character must be a 
numeral. In other versions of Altair BASIC, the variable name 
may be any length, but any alphanumeric characters after • the 
first two are ignored. The first character' must be a letter. 
No reserved words may appear as variable names or within 
variable names. The following are examples of legal and 
illegal Altair BASIC variables: 



Legal 
In 4K and 8K Altair BASIC: 
A 



21 



Other versions: 
TP 

PSTG$ 



Illegal 

%A (first character must 
be alphabetic.) 
Z1A (variable name is too 
long for 4K) 

TO (variable names cannot 
be reserved words) 



COUNT 



RGOTO (variable names can- 
not contain reserved 
words. ) 



In all but 4K Altair BASIC, a variable may also represent 
a string. Use of this feature is discussed in section 4. 



12 
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1) Extended and Disk versions of Altair BASIC allow the 
use of Integer and Double Precision variables as well as 
Single Precision and Strings. The type of a variable may be 
explicitly declared in Extended and Disk versions of Altair 
BASIC by using one of the symbols in the table below as the 
last character of the variable name. 



Type 



Svmbol 



Strings (0 to 255 characters) 

Integers (-32768 to 32767) 

Single Precision (up to 7 digits, exponent between 

-33 and +38) 
Double Precision (up to 16 digits, exponent between 

-38 and +38) 



Internally, BASIC handles all numbers in binary. Therefore, 
some 8 digit single precision and 17 digit double precision 
numbers may be handled correctly. If no type is explicitly 
declared, type is determined by the first letter of the 
variable name according to the type table. The table of tyoes 
may be modified with the following statements: 



DEFINT r 
DEFSTR r 
DEFSNG r 
DEFDBL r 



Integer 

String 

Single Precision 

Double Precision 



where r is a letter or range 
Examples: 



of letters to be designated 



15 DEFINT I-H 
20 DEFDBL D 



Variable names beginning with the let- 
ters I-N are to be of integer type. 
Variable names beginning with D are to 
be of double precision type. 



If no type definition statements are encountered, 
proceeds as if it had executed a DEFSNG A-Z statement. 



BASIC 



2) Integer variables should be used wherever possible 
since they take the least amount of space in memory and 
integer arithmetic is much faster than single precision 
arithmetic. 

Care must be exercised when single precision and double 

precision numbers are mixed. Since single precision numbers 

can have more significant digits than will be printed, a 

double^ precision variable set to a single precision value may 

•not print the same as the single precision variable. 



10 A-1.01 

20 3#=A*10:C#=CD3L(A) *10# 



single orecision value 
convert to double precision 
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30 PRINTA;B#;C#;CDBL(A) in various ways 
RUN 

1.01 10.10000038146973 10.09999990463257 1.009999990463257 
OK 

In order to assure that double precision numbers will print 
the same as sinqle precision, the VAL and STR$ functions 
should be used. For example: 

10 A=1.01 

20 3#=VAL(STR$(A)) :C#=B#*10# 

30 PRINT A;B#;C# 

RUN 

1.01 1.01 10.1 
OK 

c. Array Variables - The DIM Statement. It is often 
advantageous to refer to several variables by the same name. 
In matrix calculations, for example, the computer handles each 
element of the matrix separately, but it is convenient for the 
programmer to refer to the whole matrix as a unit. For this 
purpose, Altair BASIC provides subscripted variables, or 
arrays. The form of an array variable is as follows: 

W(<subscript> [ ,<subscript>. . . ] ) 

where W is a variable name and the subscripts are integer 
expressions. Subscripts may be enclosed in parentheses or 
square brackets. An array variable may have only one 
dimension in 4K, but in all other versions of Altair BASIC it 
may have as many dimensions as will fit on a single line. The 
smallest subscript is zero. Examples: 

A(5) The sixth element of array A. The first 

element is A(0) . 

ARRAY (I, 2* J) The address of this element in a two- 
dimensional array is determined by 
evaluating the expressions in parenthe- 
ses at the time of the reference to the 
arrav and truncatinq to integers. If 
1=3 and J=2.4, this refers to ARRAY(3,4). 

The DIM statement allocates storage for array variables and 
sets all array elements to zero. The form of the DIM 
statement is as follows: 

DIM W(<subscript> [ ,<subscript>. . . ] ) 

where W is a legal variable name. Subscript is an. integer 
expression which specifies the largest possible subscript for 
that dimension. Each DIM statement may apply to more than one 
array variable. Some examples follow: 
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113 DIM A{3) , DS (2,2,2) 
, 114 DIM R2%(4) , B(10) 

115 DIM 01 (N) , Z#(2+I) Arrays may be dimensioned dy- 
namically during program 
execution. At the time the 
DIM is executed, the expression 
within the parentheses is e- 
valuated and the results trun- 
cated to integer. 

If no DIM statement has been executed before an array variable 
is found in a program, BASIC assumes the variable to have a 
maximum subscript of 10 (11 elements) for each dimension in 
the reference. A 3S or SUBSCRIPT OUT OF RANGE error message 
will be issued if an attempt is made to reference an array 
element which is outside the space allocated in its associated 
DIM statement. This can occur when the wrong number of 
dimensions is used in an array element reference. For 
example: 

30 LET A(1,2,3)=X when A has been dimensioned by 
10 DIM A (2, 2) 

A DD or REDIMENSIONED ARRAY error occurs when a DIM statement 
for an array is found after that array has been dimensioned. 
This often occurs when a DIM statement appears after an array 
has been given its default dimension of 10. 

d. Operators and Precedence. Altair BASIC provides a 
full range of arithmetic and (exceot in 4K) logical operators. 
The order of execution of operations in an expression is 
always according to their precedence as shown in the table 
below. The order can be specified explicitly by the use of 
parentheses in the normal algebraic fashion." 

Table of Precedence 

Operators are shown here in decreasing order of precedence. 
Operators listed in the same entry in the table have the same 
precedence and are executed in order from left to right in an 
expression. 

1. Expressions enclosed in parentheses () 

2. " exponentiation (not in 4K) . Any number to the zero 
power is 1. - Zero to a neaative oower causes a /0 or 
DIVISION BY ZERO error. 

3. - negation, the unary minus operator 
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* 4. *,/ multiplication and division 

5. \ integer division (available in Extended and Disk 
versions, see section 5-2) 

6. MOD (available in Extended and Disk versions. See 
section 5-2) 

7. +,- addition and subtraction 

8. relational operators 

= equal 

<> not equal 

< less than 

> greater than 

<=,=< less than or equal to 

>=,=> greater than or equal to 

(the logical operators below are not available in 4K) 

9. NOT logical, bitwise negation 

10. AND logical, bitwise disjunction 

11. OR logical, bitwise conjunction 

(The logical .operators below are available only in 
Extended and Disk versions.) 



12. XOR logical, bitwise exclusive OR 

13. EQV logical, bitwise equivalence 

14. IMP logical, bitwise implication 

In 4K Altair BASIC, relational operators may be used only once 
in an IF statement. In all other versions, relational 
operators may be used in any expressions. Relational 
expressions have the value either of True (-1) or False (0) . 

e. Logical Operations. Logical operators may be used 
for bit manipulation and Boolean algebraic functions. The 
AND, OR, NOT, XOR, EQV and IMP operators convert their 
arguments into sixteen bit, signed, two's complement integers 
in'the range -32768 to 32767. After the operations are 
performed, the result is returned in the same form and range. 
If the arguments are not in this range, ' an FC or ILLEGAL 
FUNCTION CALL error message will be printed and execution will 
be terminated. Truth tables for the logical oDer'ators apoear 
below. The operations are oerformed bitwise, that is, 
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corresponding bits of each argument are examined and the 
result computed one bit at a time. In binary operations, bit 
7 is the most significant bit of a byte and bit is the least 
significant. 



AND 



OR 



NOT 



XOR 



EQV 



IMP 



X 


Y 




X 


AND Y 


1 


1 






1 


1 















1 






















X 


Y 




X 


OR Y 


1 


1 






1 


1 









1 





1 






1 















X 


NOT 


X 




1 
















1 






X 


Y 




X 


XOR Y 


1 


1 









1 









1 





1 






1 















X 


Y 




X 


EQV Y 


1 


1 






1 


1 















1 



















1 


X 


Y 




X 


IMP Y 


1 


1 






1 


1 















1 






1 












1 



Some examples will serve to show how the logical ocerations 
work: 

63 AND 16=16 63=binary 111111 and 16=binary 10000, 

so 63 AND 16=16 
15 AND 14=14 15=binarv 1111 and 14=binary 1110, 

so 15 AND 14=binary 1110=14 '. 
-1 AND 8=8 -l=binary llllllllilllllll and 3=binary 

1000, so -1 AND 8=8. 
4 OR 2=6 4=binary 100 and 2=binary 10, so 

4 OR 2=binary 110=6. • 
10 OR 10=10 binary 1010 OR'd with itself is 1010= 
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10. 

-1 OR -2—1 -l=binary 111111111111111L and -2- 

1111111111111110, so -1 OR -2—1. 
NOT — 1 the bit complement of sixteen zeros 

is sixteen ones, which is the two's .. 

complement representation of -1. 
NOT X— (X+l) the two's complement of any number is 

the bit complement plus one. 

A typical use of logical operations is 'masking', testing a 
binary number for some predetermined pattern of bits. Such 
numbers might come from the computer's incut ports and would 
then reflect the condition of some external device. Further 
applications of logical operations will be considered in the 
discussion of the IF statement. 

f. The LET statement. The LET statement is used to 
assign a value to a variable. The form is as follows: 

LET <W>=<expression> 

where W is a variable name and the expression is any valid 
Altair BASIC arithmetic or, exceot in 4K, logical or string 
expression. Examples: 

1000 LET V=X 

110 LET 1=1+1 the '=' sign here means 'is replaced 

by .... ' 

The word LET in a LET statement is optional, so algebraic 
equations such as: 

120 V=.5*(X+2) 

are legal assignment statements. 

A SN or SYNTAX ERROR message is orinted when BASIC 
detects incorrect form, illegal characters in a line, 
incorrect punctuation or missing parentheses. An OV or 
OVERFLOW error occurs when the result of a calculation is too 
large to be represented by Altair BASIC'S number formats. All 
numbers must be within the range 1E-38 to 1.70141E38 or -1E-38 
to -1.70141E38. An attempt to divide by zero results in the 
/0 or DIVISION BY ZERO error message. 

For a discussion of strings, string variables and string 
operations, see section 4. 
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2-2. Branching, Loops and Subroutines. 

a. Branching. In addition to the sequential execution 
of program lines, BASIC provides for changing the order of 
execution. This provision is called branching and is the 
basis of programmed decision making and loops. The "statements 
in Altair BASIC which provide for branching are the GOTO, 
IF... THEN and ON... GOTO statements. 

1) GOTO is an unconditional branch. Its form is as 
follows : 

GOTO<mrammm> 

After the GOTO statement is executed, execution continues at 
line number mmmmm. 

2) IF... THEN is a conditional branch. Its form is as 
follows: 

IF<expression>THEN<mmmmm> 

where the expression is a valid arithmetic, relational or, 
except in 4K, logical expression and mmmmm is a line number. 
If the expression is evaluated as non-zero, BASIC continues at 
line mmmmm. Otherwise, execution resumes at the next line 
after the IF... THEN statement. 

An alternate form of the IF... THEN statement is as 
follows: ■ 

IF<expression>THEN<statement> 

where the statement is any Altair BASIC statement. Examples: 

10 IF A=10 THEN 40 If the expression A=10 is 

true, BASIC branches to line 40. Otherwise, execution 
proceeds at the next line. 

15 IF A<3+C OR X THEN 100 The expression after IF is 

evaluated and if the value of the expression is 
non-zero, the statement branches to line 100. 
Otherwise, execution continues on the next line. 

20 IF X THEN 25 If X is not zero, the statement 
branches to line 25. 

30 IF X=Y THEN PRINT X If the expression X=Y is true 

(its value is non-zero), the PRINT statement is 
executed. Otherwise, the PRINT statement is not 
executed. In either case, execution continues with 
the line after the IF... THEN statement. 

35 IF X=Y+3 GOTO 39 Equivalent to the corresponding 

IF... THEN statement, except that GOTO must be followed 
bv a line number and not by another statement. 
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Extended and Disk versions of Altair BASIC provide an expanded 
IF... THEN statement of the form 

IF<expression>THEN<YY>ELSE<ZZ> 

where YY and ZZ are valid line numbers or Altair BASIC 
statements. Examples: 

IF X>Y THEN PRINT "GREATER" ELSE PRINT "NOT GREATER" 

If the expression X>Y is true, the statement after THEN is 
executed. Otherwise, the statement after ELSE is executed. 

IF X=2*Y THEN 5 ELSE PRINT "ERROR" 

If the expression X=2*Y is true, BASIC branches to line 5. 
Otherwise, the PRINT statement is executed. Extended and Disk 
Altair BASIC allow a comma before THEN. 

IF statements may be nested in the Extended and Disk 
versions. Nesting is limited only by the length of the line. 
Thus, for example: 

IF X>Y THEN PRINT "GREATER" ELSE IF Y>X<line feed> 
THEN PRINT "LESS THAN" ELSE PRINT "EQUAL" 

and 

IF X=Y THEN IF Y>Z THEN PRINT "X>Z" ELSE PRINT "Y<=Z" <line feed> 
ELSE PRINT "XOY" 

are legal statements. If a line does not contain the same 
number of ELSE and THEN clauses, each ELSE is matched with the 
closest unmatched THEN. Example: 

IF A=3 THEN IF 3=C THEN PRINT "A=C" ELSE PRINT "AOC" 

will not print "AOC" when AOB. 

3) ON... GOTO (not in 4K) provides for another type of 
conditional branch. Its form is as follows: 

ON<expression>GOTO<list of line numbers> 

After the value of the expression is truncated to an integer, 
say I, the statement causes BASIC to branch to the line whose 
number is Ith in the. list. The statement may be followed by 
as many line numbers as will fit on one line. If 1=0 or is 
greater than the number of lines in the list, execution will 
continue at the next line after the ON... GOTO statement. I 
must not be less than zero or greater than 255, or an FC or 
ILLEGAL FUNCTION CALL error will result. 
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b. Loops - FOR and NEXT. It is often desirable to 
perform the same calculations on different data or 
repetitively on the same data. For this purpose, Altair BASIC 
provides the FOR and NEXT statements.. The form of the FOR 
statement is as follows: 

FOR<variable>=<X>TO<Y> [STEP <Z>] 

where X,Y and Z are expressions. When the FOR statement is 
encountered for the first time, the expressions are evaluated. 
The variable is set to the value of X which is called the 
initial value. BASIC then executes the statements which 
follow. the FOR statement in the usual manner. When a NEXT 
statement is encountered, the step Z is added to the variable 
which is then tested against the final value Y. If Z, the 
step, is positive and the variable is less than or equal to 
the final value, or if the step is negative and the variable 
is greater than or equal to the final value, then 3ASIC 
branches back to the statement immediately following the FOR 
statement. Otherwise, execution oroceeds with the statement 
following the NEXT. If the step is not specified, it is 
assumed to be 1. Examples: 

10 FOR 1=2 TO 11 The loop is executed 10 times with 

the variable I taking on each in- 
tegral value from 2 to 11. 

20 FOR V=l TO 9„.3 This loop will execute 9 times un- 
til V is greater than 9.3 

30 FOR V=10*N TO 3.4/Z STEP SQR(R) The initial, final 

and step expressions need not be 
integral, but they will be eval- 
uated only once before loop- 
ing begins. 

40 FOR V=9 TO 1 STEP -1 This loop will be executed 9 

times. 

FOR — NEXT loops may be nested. That is, BASIC will execute a 
FOR... NEXT loop within the context of another loop. An 
example of two nested loops follows: 

100 FOR 1=1 TO 10 
120 FOR J=l TO I 
130 PRINT A. (I, J) 
140 NEXT J 
150 NEXT I 

Line 130 will print 1 element of A for 1=1, 2 for 1=2 and so 
on. If loops are nested, they must have different loop 
variable names. The NEXT statement for the inside loop 
variable • (J in the example) must appear before that for the 
outside variable (I). Any number of levels of nesting is 
allowed up to the limit of available memorv. 
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The NEXT statement is of the form: 

NEXT[<variabl*e>[,<variable>.. .] ] 

where each variable is the loop variable of a FOR loop for 
which the NEXT statement is the end point. In the 4K version, 
the only form allowed is NEXT with one variable. In all other 
versions, NEXT without a variable will match the most recent 
FOR statement. In the case of nested loops which have the 
same end point, a single NEXT statement may be used for all of 
them, except in 4K. The first variable in the list must be 
that of the most recent loop, the second of the next most 
recent, and so on. If BASIC encounters a NEXT statement 
before its corresponding FOR statement has been executed, an 
NF or NEXT WITHOUT FOR error message is issued and execution 
is terminated. 

c. Subroutines - GOSUB and FETURN Statements. If the 
same operation or series of operations are to be performed in 
several places in a program, storage space requirements and 
programming time will be minimized by the use of subroutines. 
A subroutine is a series of statements which are executed in 
the normal fashion upon being branched to by a GOSUB 
statement. Execution of the subroutine is terminated by the 
RETURN, statement which branches back to the statement after 
the most recent GOSUB. The format of the GOSUB statement is 
as follows: 

GOSUB<line number> 

where the line number is that of the first line of the 
subroutine. A subroutine may be called from more than one 
place in a program, and a subroutine may contain a call to 
another subroutine. Such subroutine nesting is limited only 
by available memory. 

Except in the 4K version, subroutines may be branched to 
conditionally by use of the ON... GOSUB statement, whose form 
is as follows: 

ON <expression> GOSUB <list of line number s> 

The execution is the same as ON... GOTO except that the line 
numbers are those of the first lines of subroutines. 
Execution continues at the next statement after the ON... GOSUB 
upon return from one of the subroutines. 

d. Memory Limitations. While nesting in loops, 
subroutines and branching is not limited by BASIC, memory size 
limitations restrict the size and complexity of programs. The 
OM or OUT OF MEMORY error message is issued when a program 
requires more memorv than is available. See Appendix C for an 
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explanation of the amount of memory required to run programs. 

2-3. Input/Output 

a. INPUT. The INPUT statement causes data input to be 
requested from the terminal. The format of the INPUT 
statement is as follows: 

INPUT<list of variables> 

The effect of the INPUT statement is to cause the values typed 
on the terminal to be assigned to the variables in the list. 
When an INPUT statement is executed, a question mark (?) is 
printed on the terminal signalling a request for information. 
The operator types the required numbers or strings (or, in 4K, 
expressions) separated bv commas and types a carriage return. 
If the data entered is invalid (strings were entered . when 
numbers were requested, etc.) BASIC prints 'REDO FROM START? 1 
and waits for the correct data to be entered. If more data 
was requested by the INPUT statement than was typed, ?? is 
printed on the terminal and execution awaits the needed data. 
If more data was typed than was requested, the warning 'EXTRA 
IGNORED 1 is printed and execution proceeds. After all the 
requested data is inout, execution continues normally at the 
statement following the INPUT. Except in 4K, an optional 
prompt string may be added to an INPUT statement. 

INPUT [ rt <prompt string>" ; ] <variable list> 

Execution of the statement causes the prompt string to be 
printed before the question mark. Then all operations proceed 
as above. The prompt string must be enclosed in double 
quotation marks ("} and must be separated from the variable 
list by a semicolon {;). Example: 

100 INPUT "WHAT'S THE VALUE" ;X,Y causes the following 
output: 

WHAT'S THE VALUE? 



The requested values of X and Y are typed after the ? Except 
in 4K, a carriage return in response to an INPUT statement 
will cause execution to continue with the values of the 
variables in the variable list unchanged. In 4K, a SN error 
results. 

b. PRINT. The PRINT statement causes the terminal to 
print data. The simplest PRINT statement is: 

PRINT 
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which' prints a carriage return. The effect is to skip a line. 
The more usual PRINT statement has the following .form: 

PRINT<list of expressions> 

which causes the values of the expressions in the list to.... be 
printed. String literals may be printed if they are enclosed 
in quotation marks ("). 

The position of printing is determined by the ounctuation 
used to separate the entries in the list. Altair BASIC 
divides the printing line into zones of 14 spaces each. A 
comma causes printing of the value of the next expression to 
begin at the beginning of the next 14 column zone. A 
semicolon (;) causes the next printing to begin immediately 
after the last value printed. If a comma or semicolon 
terminates the list of expressions, the next PRINT statement 
begins printing on the same line according to the conditions 
above. Otherwise, a carriage return is printed. 

C. DATA, READ, RESTORE 

1) The DATA statement. Numerical or string data needed 
in a program may be written into the program statements 
themselves, input from peripheral devices or read from DATA 
statements. The format of the DATA statement is as follows: 

DATA<list> 

where the entries in the list are numerical or string 
constants separated by commas. In 4K, expressions may also 
appear in the list. The effect of the statement is to store 
the list of values in memory in coded form for access by the 
READ statement. Examples: 

10 DATA 1,2,-1E3,.04 

20 DATA " LOO", MITS Leading and trailing spaces in 

string values are suppressed unless the string is 

enclosed by double quotation marks. 

2) The READ statement. The data stored by DATA 
statements is accessed by READ statements which have the 
following form: 

READ<list of variables> 

•where the entries in the list are variable names separated by 
commas. The effect of the READ statement is to assign the 
values in the DATA lists to the corresponding variables in the 
READ statement list. This is done one by one from left to 
right until the READ list is exhausted. If there are more 
names in the READ list than values in the DATA lists, an OD or 
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OUT OF DATA error message is issued. If there are more values 
stored in DATA statements than are read by a READ statement, 
the next READ statement to be executed will begin with the 
next unread DATA list entry. A single READ statement may 
access more than one DATA statement, and more than one READ 
statement may access the data in a single DATA statement. .... 

An SN or SYNTAX ERROR message can result from an 
improperly formatted DATA list. In 4K Altair BASIC, the error 
message will refer to the READ statement which attempted to 
access the incorrect data. In other versions, the line number 
in the error message will refer to the actual line of the DATA 
statement in which the error occurred. 

3) The RESTORE statement. After the RESTORE statement is 
executed, the next piece of data accessed by a READ statement 
will be the first entry of the first DATA list in the program. 
This allows re-READing the data. 

d. CSAVE and CLOAD (8K cassette, Extended and Disk 
versions only) . Numeric arrays may be saved on cassette or 
loaded from cassette using CSAVE* and CLOAD*. The formats of 
the statements are: 

CSAVE*<array name) 

and 

CLOAD*<array name) 

The array is written out in binary with four octal 210 header 
bytes to indicate the start of data. These bytes are searched 
for when CLOADing the array. The number of bytes written is 
four plus: 

3*<number of elements) for a double orecision array 
4*<number of elements) for a single precision array 
2*<nuraber of elements) for an integer array 

«-7hen an array is written out or read in, the elements of the 
array are written out with the leftmost subscript varying most 
quickly, the next leftmost second, etc: 

DIM A(10) 
CSAVE*A 

writes out A (0) ,A(1) , . . . A(10) 

DIM A(10,10) 
C5AVE*A 
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writes out A(0,0), A(1,0) . . . A (10,0) ,A(10 ,1) . . .A (10 ,10) 

Using this fact, it is possible to write a two dimensional 
array and read it back in as a single dimensional array, etc. 



NOTE 

Writing out a double precision array and reading it 
back in as a single precision or integer array is not 
recommended. Useless values will undoubtedly be 
returned. 



e. Miscellaneous Input/Output 

1) WAIT (not in 4K) . The status of input ports can be 
monitored by -the WAIT command which has the following format: 

WAIT<I,J>[,<K>] 

where I is the number of the port being monitored and J and K 
are integer expressions. The port status is exclusive ORd 
with K and the result is ANDed with J. Execution is suspended 
until a non-zero value results. J picks the bits of port I to 
be tested and execution is suspended until those bits differ 
from the corresponding bits of K. Execution resumes at the 
next statement after the WAIT. If K is omitted, it is assumed 
to be zero. I, J and K roust be in the range to 255. 
Examples : 



WAIT 20,6 



Execution stops until either bit 1 or bit 
2 of port 20 are eaual to 1. (Bit is 
least significant bit, 7 is the most sig- 
nificant.) Execution resumes at the next 
statement. 



WAIT 10,255,7 Execution stops until any of the most 

significant 5 bits of oort 10 are one or 

any of the least significant 3 bits are 

zero. Execution resumes at the next statement. 



2) POKE, PEEK (not in 4K) . Data may be entered into 
memory in binary form with the FOKE statement whose format is 
as follows: 



POKE <I,J> 
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where I and J are integer expressions. POKE stores the byte J 
into the location specified by the value of I. In 8K, I must 
be less than 32769. In Extended and Disk versions, I may be 
in the range to 65535. J must be in the range to 255. In 
8K, data may be POKEd into memory above location 32768 bv 
making I a negative number. In that case, I is computed by 
subtracting 65536 from the desired address. To POKE data into 
location 45000, for example, I is 45000-65536=-20536. Care 
must be taken not to POKE data into the storage area occupied 
by Altair BASIC or the system may be POKEd to death, and BASIC 
will have to be loaded again. 

The complementary function to POKE is PEEK. The format 
for a PEEK call is as follows: 

PEEK(<I>) 

where I is an integer expression specifying the address from 
which a byte is read. I is chosen in the same way as in the 
POKE statement. The value returned is an integer between 
and 255. A major use of PEEK and POKE is to pass arguments 
and results to and from machine language subroutines. 

3)OOT, IMP (not in 4K) . The format of the OUT statement 
is as follows: 

OUT <I,J> 

where I and J are integer expressions. OUT sends the byte 
signified by J to output port I. I and J must be in the range 
to 255. 

The INP function is called as follows: 

INP(<I>) 

INP reads a byte from port I where I is an integer expression 
in the range to 255. Example: 

20 IF INP (J) =16 THEN PRINT "ON" 
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jk FUNCTIONS. 

Altair BASIC allows functions to be referenced in 
mathematical function notation. The format of a function call 
is as follows: 

<name> { <argument> [ , <argument> . . . ] ) 

where the name is that of a previously defined function and 
the arguments are one or more expressions separated by commas. 
Only one argument is allowed in 4K and 8K. Function calls may 
be components of expressions, so statements like 

10 LET T=(F*SIN(T) )/P and 

20 C=SQR(A~2+B~2+2*A*B*COS(T) ) 

are legal. 

3-1. Intrinsic Functions 

Altair BASIC provides several frequently used functions which 
may be called from any program without further definition. A 
procedure is provided, however, whereby unneeded functions may 
be deleted to save memory space. See Appendix B. For a list 
of intrinsic functions, see section 6-3. 

3-2. User-Defined Functions - the DEF Statement (not in 4K) . 



a. The DEF statement. The programmer may define 
functions which are not included in the list of intrinsic 
functions by means of the DEF statement. The form of the DEF 
statement is as follows: 

DEF<function name> (<variable list>) =<expression> 

where the function name must be FN followed by a legal 
variable name and the entries in the variable list are 'dummy' 
variable names. The dummy variables represent the argument 
variables or values in the function call. In 8K Altair BASIC, 
only one argument is allowed for a user-defined function, but 
in the Extended and Disk versions, any number of arguments is 
allowed. Any expression may appear on the right side of the 
equation, but it must be limited to one line. User-defined 
functions may be of any type in Extended and Disk versions, 
but user-defined string functions are not allowed in 8K. If a 
type is specified for the function, the value of the 
expression is forced to that type before it is returned to the 
calling statement. Examples: 
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10 DEF FNAVE(V,W)*(V+W)/2 

11 DEF FNC0N$(V$,W$)»RIGHT$(V$+W$,5) Returns the right 

most 5 characters of *the concat- 
enation of V$ and W$ . 

12 DEF FNRAD(DEG)=3.14159/180*DEG When called with the 

measure of an angle in degrees,"" 
returns the radian equivalent. 

A function may be redefined by executinq another DEF statement 
with the same name, h DEF statement must be executed before 
the function it defines may be called. 

b. USR. The USF function allows calls to assembly 
language subroutines. See appendix E. 

3-3. Errors. 

a. An FC or ILLEGAL FUNCTION CALL error results when an' 
improper call is made to a function. Some places this might 
occur are the following: 

1. a negative array subscript. LET A(-1)=0, for example. 

2. an array subscript that is too large (>3276.7) 

3. negative or zero argument for LOG 

4. Negative argument for SQR : 

5. A~3 with A negative and B not an integer 

6. a call to USR with no address patched for the machine 
language subroutine. 

7. improper arguments to MID$ , LEFT$ , RIGHTS, INP, OUT, 
WAIT, PEEK, POKE, TAB, SPC, INSTR, STRING?, SPACE$ or 
ON ... . GOTO . 



b. An attempt to call a user-defined function which has 
not previously appeared in a DEF statement will cause a UF or 
UNDEFINED USER FUNCTION error. 

c. A TM or TYPE MISMATCH error will occur if a function 
which expects a string argument is given a numeric value or 
vice-versa. 
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4^ STRINGS 

In all Altair 3ASIC versions except 4K, expressions may 
either have numeric value or may be strings of characters. 
Altair BASIC provides a complete complement of statements and 
functions for manipulating string data. Many of the 
statements have already been discussed; so ,only their 
particular application to strings will be treated in this 
section. 

4-1. String Data . 

A string is a list of characters which may be from to 
255 characters in length. Strings may be stated explicitly as 
constants or referred to symbolically by variables. String 
constants are delimited by quotation marks at the beginning 
and end. A string variable name ends with a dollar sign ($) . 
Examples: 

A$="A3CD" Sets the variable A$ to the four character 
string "ABCD" 

B9$=".14A/56" Sets the variable B9$ to the six character 
string "14A/56" 

FOOFOO$="E$" Sets the variable FOOFOO$ to the two charac- 
ter string "E$" 

Strings input to an INPUT statement need not be surrounded' by 
quotation marks. 

String arrays may be dimensioned exactly as any other 
kind of array by use of the DIM statement. Each element of a 
string array is a string which may be up to 255 characters 
long. The total number of string characters in use at any 
point in the execution of a program must not exceed the total 
allocation of string space, or an OS or OUT OF STRING SPACE 
error will result. String space is allocated by the CLEAR 
command which is explained in section 6-2. 

4-2. Strina Operations. 



a. Comparison Operators. The comparison operators for 
strings are the same as those for numbers: 

= equal 

<> not equal 

< less than 

> greater than 

=<,<= less than or equal to 

=>,>= greater than or equal to 

Comparison is made character bv character on the basis of 
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ASCII codes until a difference is found. If, while comparison 
is proceeding, the end of one string is reached, the shorter 
string is considered to be smaller. ASCII codes may be found 
in Appendix A. Examples: 

A<Z ASCII A is 965, Z is 090 
1<A ASCII 1 is 049 

" A">"A" Leading and trailing blanks are significant 
in string literals. 

b. String Expressions. String expressions are comoosed 
of string literals, string variables and string function calls 
connected by the concatenation ooerator (+) . The effect of 
the catenation operator is to add the string on the right side 
of the operator to the end of the string on" the left. If the 
result of concatenation is a string more than 255 characters 
long, an LS or STRING TOO LONG error "message will be issued 
and execution will be terminated. 



c. Input/Output. The same statements used for incut and 
output of normal numeric data may also be used for strina 
data. 

1) INPUT, PRINT. The INPUT and PRINT statements read and 
write strings on the terminal. Strings need not be enclosed 
in quotation marks, but if they are not, leading blanks will 
be ignored and the string will be terminated when the first 
comma or colon is encountered. Examoles: 



10 INPUT ZOO$,FOO$ 
20 INPUT X$ 

30 PRINT X$,"HI, THERE" 



Reads two strings 
Reads one string and assigns 
it to the variable X$. 
Prints two strings, including 
all spaces and punctuation 
in the second. 



2) DATA, READ. DATA and READ statements for string data 
are the same as for numeric data. For format conventions, see 
the explanation of INPUT and PRINT above. 

4-3. Strinq Functions. 



The format for intrinsic string function calls is the 
.same as that for numeric functions. For the list of string 
functions, see section 6-3. Special user-defined string 
functions are allowed in Extended and Disk versions and may be 
defined by the use of the DEF statement (see section 3-2) . 
String function names must end with a dollar siani 
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5. EXTENDED VERSIONS. 



The Extended and Disk versions of Altair BASIC provide 
several statements, operators, functions and commands which 
are not available either in the 4K or 8K versions. For 
clarity, these features are grouped together in this section. 
Some modifications to existing 4K and 8K features, such as the 
IF. . .THEN. . .ELSE statement and number typing facilities, have 
been discussed in conjunction with the other versions. Check 
the index for references to those features. 

5-1. Extended Statements 

a. ERASE. The ERASE statement eliminates arrays from a 
program and allows their space in memory to be used for other 
purposes. The format of the ERASE statement is as follows: 

ERASE<array variable list> 

where the entries in the list are valid array variable names 
separated by commas. ERASE will only operate on arrays and 
not array elements. If a name appears in the list which is 
not used in the program, an ILLEGAL FUNCTION CALL error will 
occur. The arrays deleted in an ERASE statement may be 
dimensioned again, but the old values are lost. 
Example: 

10 DIM A(5,5) etc. 



60 ERASE A 
70 DIM A(100) 



b. LINE INPUT. It is often desirable to input a whole 
line to a string variable without use of quotation marks and 
other delimiters. LINE INPUT provides this facility. The 
format of the LINE INPUT statement is as follows: 

LINE INPUT ["<prompt str ing>" ] ; <str ing variable name) 

The prompt string is a string literal that is printed on the 
terminal before input is accepted. A question mark is not 
printed unless it is contained in the oromot string. All 
input from the end of the orompt string to the carriage return 
is assigned to the string variable. A LINE INPUT may be 
escaped by typing Control/C. At that point, BASIC returns to 
command level and orints OK. Execution may be resumed at the 
LINE INPUT by typing CONT. LINE INPUT destroys the inout 
buffer, so the command may not be edited by Control/A for 
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re-execution. 

c. SWAP. The SWAP statement allows the values of two 
variables to be exchanged. The format is as follows: 

SWAP <variable,variable> 

The value of the second variable is assigned to the first 
variable and vice-versa. Either or both of the variables may 
be elements of arrays. If one or both of the variables are 
non-array variables which have not had values assigned to 
them, an ILLEGAL FUNCTION CALL error will result. Both 
variables must be of the same type or a TYPE MISMATCH error 
will result. Example: 

10 INPUT F$,L$ 
20 SWAP F$,L$ 
30 PRINT F$,L$ 
RUN 

?FIRST,LAST Data input 

LAST FIRST Comouter prints 



d. TRON, TROFF, As a debugging aid, two statements are 
provided to trace the execution of program instructions. When 
the trace flag is turned on by the TRON statement, the number 
of each line in the program is printed as it is executed. The 
numbers appear enclosed in square brackets ([]). The function 
is disabled by execution of the TROFF statement. Example: 

TRON executed in direct mode 

OK printed by computer 

10 PRINT 1: PRINT "A" typed bv programmer 
20 STOP 
RUN 

[10] 1 line numbers and output printed by 

A computer. 

[20] 

BREAK IN 20 

The NEW command will also turn off the trace flag. 

e. IF THEN ELSE. See section 2-2. 

f. DEFINT, DEFSNG, DEFDSL, DEFSTR. See section 2-1 

g. CONSOLE, WIDTH. CONSOLE allows the console terminal 
to be switched from one I/O oort to another. The format of 
the statement is: 

CONSOLE <I/0 port number> , <switch register setting> 
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The <I/0 port number> is the hardware port number of the low 
order (status) port of the new I/O board. This value must be 
a numeric expression between and 255 inclusive. If it is 
not in this range, an ILLEGAL FUNCTION CALL error will occur. 
The <switch register setting> is also a value between 0'and 
255 inclusive which specifies the type of I/O port (SIO, PIO, 
4PI0 etc) being selected. Appropriate values of the <switch 
register setting> may be found in Appendix B in the table of 
sense switch settings or in the tabie below. 

Table of values for <switch register setting>: 



I/O Board 


Sense Switch 




Setting 


2SI0 with 2 stop bits 





2SI0 with 1 ston bit 


1 


SIO 


2 


ACR 


3 


4PI0 


4 


PIO 


5 


HSR 


6 


non-standard terminal 


14 


no terminal 


15 



WIDTH Statement 

The WIDTH statement sets the width in characters of the 
printing terminal line. The format of the WIDTH statement is 
as follows: 

WIDTH <integer expression> 

Example: 

WIDTH 80 
WIDTH 32 



The <numeric formula> must have a value between 15 and 
inclusive, or an ILLEGAL FUNCTION CALL error will occur. 



255 



h. Error Trapping. Extended and Disk Altai r BASIC make 
it possible for the user to write error detection and handling 
routines which can attempt to recover from errors or provide 
more complete explanation of the cause of errors than the 
simple error messages. This facility has been added to Altair 
BASIC through the use of the ON ERROR GOTO, RESUME and ERROR 
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statements and with the ERR and ERL variables. 

1) Enabling Error Trapping. The ON ERROP GOTO statement 
specifies the line of the Altair BASIC program on which the 
error handling subroutine starts. The format is as follows: 

ON ERROR GOTO <line number > 

The ON ERROR GOTO statement should be executed before the user 
expects any errors to occur. Once an ON ERROR GOTO statement 
has been executed, all errors detected will cause BASIC to 
start execution of the specified error handling routine. If 
the <line number> specified in the ON ERROR GOTO statement 
does not exist , an UNDEFINED LINE error will occur. 

Example: 

10 ON ERROR GOTO 1000 



2) Disabling the Error Routine. ON ERROR GOTO disables 
trapping of errors so any subsequent error will cause BASIC to 
print an error message and stoo program execution. If an 
ON ERROR GOTO statement appears in an error traooing 
subroutine, it will cause BASIC to stop and print the error 
message which caused the trap. It is recommended that all 
error trapping subroutines execute an ON ERROR GOTO 
subroutine if an error is encountered for which they have no 
recoverv action. 



NOTE 

If an error occurs during the execution of an error 
trap routine, the system error message will be printed 
and execution will be terminated. Error trapping does 
not trap errors within the error trao routine. 



3) The ERR and ERL Variables. When the error handling 
subroutine is entered, the variable ERR contains the error 
code for the error. The error codes and their meanings are 
listed below. See section 6-5 for a detailed discussion of 
each of the errors and error messages. 



Code Error 

1 NEXT WITHOUT FOR 

2 SYNTAX ERROR 
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3 RETURN WITHOUT G0SU3 

4 OUT OF DATA 

5 ILLEGAL FUNCTION CALL 

6 OVERFLOW 

7 OUT OF MEMORY 

8 UNDEFINED LINE 

9 SUBSCRIPT OUT OF RANGE 

10 REDIMENSIONED ARRAY 

11 DIVISION BY ZERO 

12 ILLEGAL DIRECT 

13 TYPE MISMATCH 

14 OUT OF STRING SPACE 

15 STRING TOO LONG 

16 STRING FORMULA TOO COMPLEX 

17 CAN'T CONTINUE 

18 UNDEFINED USER FUNCTION 

19 NO RESUME 

20 MISSING OPERAND 

21 RESUME WITHOUT ERROR 

22 UNPRINTABLE ERROR 

23 LINE BUFFER OVERFLOW 



Disk Errors 

50 FIELD OVERFLOW 

51 INTERNAL ERROR 

52 BAD FILE NUMBER 

53 FILE NOT FOUND 

54 BAD FILE MODE 

55 FILE ALREADY OPEN 

56 DISK NOT MOUNTED 

57 DISK I/O ERROR 

58 FILE ALREADY EXISTS 

59 SET TO NON-DISK STRING 

60 DISK ALREADY MOUNTED 

61 DISK FULL 

62 INPUT PAST END 

63 BAD RECORD NUMBER 

64 SAD FILE NAME 

65 MODE-MISMATCH 

66 DIRECT STATEMENT IN FILE 

67 TOO MANY FILES 

68 OUT OF RANDOM BLOCKS 



The ERL variable contains the line number of the line 
where the error was detected. For instance, if the error 
occured in line 1000, ERL will be equal to 1000. If the 
statement which caused the error was a direct mode statement, 
ERL will be equal to 65535 decimal. To test if an error 
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occurred in a direct statement, use 

IF 65535=ERL THEN .. . 
In all other cases, use 

IF ERL=<line number> THEN... 

If the line number is on the left of the eauation, it cannot 
be renumbered by RENUM (see section 1-la) . 

4) Disk Error Values - The ERR function. The ERR 
function returns the parameters of a DISK I/O ERROR. ERR(0) 
returns the number of the disk, ERR(l) returns the track 
number (0-76) and ERR(2) returns the sector number (0-31). 
ERR (3) and ERR (4) contain the low and high order bytes, 
respectively, of the cumulative error count since BASIC was 
loaded. 



NOTE 

Neither ERL nor ERR may appear to the left of the = 
sign in a LET or assignment statement. 



5) The RESUME statement. The RESUME statement is used to 
continue execution of the BASIC program after the error 
recovery procedure has been performed. The user has three 
options. The user may RESUME execution at the statement that 
caused the error, at the statement after the one that caused 
the error or at some other line. To RESUME execution at the 
statement which caused the error, the user should use: 

RESUME 

or 

RESUME 

To RESUME execution at the statement immediately after the one 
which caused the error, the user should use: 

RESUME NEXT 

To RESUME execution at a line dfferent than the one where the 
error occurred, use: 
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RESUME <line number> 

Where <line number> is not equal to zero. 

6) Error Routine Example. The following example shows 
how a simple error trapping subroutine operates. 

100 ON ERROR GOTO 500 

200 INPUT "WHAT ARE THE NUMBERS TO DIVIDE" ;X,Y 

210 Z=X/Y 

220 PRINT "QUOTIENT IS";Z 

230 GOTO 200 

500 IF ERR-11 AND ERL=210 THEN 520 

510 ON ERROR GOTO 

520 PRINT "YOU CANT HAVE A DIVISOR OF ZERO!" 

530 RESUME 200 



7) The ERROR statement. In order to force branching to 
an error trapping routine, an ERROR statement has been 
provided. The primary use of the ERROR statement is to allow 
the user to define his own error codes which can then 
conveniently be handled by a centralized error trap routine as 
described above. The format of the ERROR statement is: 

ERROR <integer expression> 

When defining error codes, values should be picked which are 
greater than the ones used by Altair BASIC. Since more error 
messages may be added to Altair BASIC, user-defined error 
codes should be assigned the highest available numbers to 
assure future compatibility. If the <numeric expression> used 
in an ERROR statement is less than zero or greater than 255 
decimal, an ILLEGAL FUNCTION CALL error will occur. Of 
course, the ERROR statement may also be used to force SYNTAX 
or other standard Altair BASIC errors. Use of an ERROR 
statement to force printout of an error message for which no 
error text is defined will cause an UNPRINTABLE ERROR message 
to be printed out. 



5-2. Extended Ooerators 
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Two operators are provided that are exclusive to the 
Extended and Disk versions. 

a. Integer Division. Integer division, denoted by \ 
(backslash) , forces its arguments to integer form and 
truncates the quotient to an integer. More precisely: 

A\3= FIX (INT (A) /INT (B) ) 
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Its precedence is just after multiplication and floating ooint 
divison. Integer division is approximately eight times as 
fast as standard floating point division. 

b. Modulus Arithmetic - the MOD operator. A MOD 3 gives 
the 'remainder' as A is divided by B. More precisely: 

A MOD B=INT(A)-(IMT{B) *(A\B) ) 

If B=0, a DIVISION BY ZERO error occurs. The precedence of 
MOD is just below that of integer division. 



5-3. Extended Functions. 



a. Intrinsic Functions. Extended and Disk Altair BASIC 
provide several intrinsic functions which are not available in 
the other versions. For a list of these functions and a 
description of their use, see section 6-3. 

b. The DEFUSE statement. Up to ten assembly language 
subroutines may be defined by means of the DEFUSR statement 
whose form is as follows: 

DEFUSR[<digit through 9>]=<integer exoression> 
Example: 

DEFUSR1=&100000 

DEFUSR2=31096 

DEFUSR9=ADR 

The <integer expression> is the starting address of the USR 
routine specified. When the USR subroutine is entered, the A 
register contains the type of the argument which was given to 
the USR function. This is also the length of the descriptor 
for that argument type: 

Value in A Meaning 

2 Two byte signed two's complement integer. 

3 String. 

4 Single orecision four byte floating ooint number 
8 Double precision floating point number. 

When the USR subroutine - is entered, the [H,Lj reaister pair 
contains a pointer to the floating point accumulator (FAC) . 
The [H,L] registers contain the address of FAC-3. 
If the value in the FAC is a single precision floating point 
number, it is stored as follows: 

FAC-3: Lowest 8 bits of mantissa. 
FAC-2: Middle 8 bits of mantissa. 
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FAC-1: Highest 7 bits of mantissa with hidden (implied) 

leading one. Bit 7 is the sign of the number (0 
positive, 1 negative). 
FAC: Exponent excess 200 octal. If the contents of FAC is 200, 
the exponent is 0. If contents Of FAC is 0,the number is 
zero. 

If the argument is double precision floating point, the FAC-7 
to FAC-4 contain four more bytes of mantissa, low order byte 
in FAC-7, etc. If the argument is an integer, FAC-3 contains 
the low order byte and FAC-2 contains the high order byte of 
the signed two's complement value. If the arqument is a 
string, [D,E] points to a string descriptor of the araument, 
whose form is: 

Byte Use 

Length of string 0-255 decimal. 

1-2 Sixteen bit address pointer to first byte of 

strings text in memory (Caution - may point into 
program text if argument is a string literal) . 

The string returned by a call to USR with a string argument is 
the string the user's routine sets up in the descriptor. 
Modifying [D,E] does not affect the returned string. For 
example, C$=USR(A$) results in C$ and A$ being set to the same 
string. The statement C$=USR(A$+" ") avoids modifying A$ 
since the user's routine modifies the descriptor of the 
temporary string A$+" ". 

A string returned by the user's routine should lie 

withing the storage area occupied by the argument string. 

Increasing the length of a string in a user's routine is 
guaranteed to cause trouble. 

Normally, the value returned by a USR function will be 
the same -type (integer, string, single or double precision 
floating point) as the argument which was passed to it. 
However, calling the MAKINT routine whose address is stored in 
location 6 will return the integer in [H,L] as the value of 
the function, forcing the value returned by the function to be 
integer. Execute the following sequence to return from the 
function: 



PUSH 
LHLD 
XTHL 

RET 



H 
6 



;SAVE VALUE TO BE RETURNED 
;GET ADDRESS OF MAKINT ROUTINE 
;SAVE RETURN ON STACK & 
;GET BACK [H,L] 
; RETURN 



The argument of the function may be forced to an integer, no 
matter what its type by calling the FRCINT routine whose 
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address is located in location 4 to get the integer value of 
the argument in [H,L] : 



LXI 



H,SUB1 





PUSH H 




LHLD 4 




PCHL 


SUB1: 




5-4. 


The EDIT Command. 



7 GET ADDRESS OF SUBROUTINE 

CONTINUATION 

; PLACE ON STACK 

;GET ADDRESS OF FRCINT 

;CALL FRCINT 



The EDIT command allows modifications and additions to be 
made to existing program lines without having to retype the 
entire line each time. Commands typed in the EDIT mode are, 
as a rule, not echoed. That is, they usually do not appear on 
the terminal screen or printout as they are typed." Most 
commands may be preceded by an optional numeric repetition 
factor which may be used to repeat the command a number of 
times. This repetition factor should be in the range to 255 
(0 is equivalent to 1) . If the repetition factor is omitted, 
it is assumed to be 1. In the following examples, a lower 
case "n" before the command stands for the repetition factor. 
In the following description of the EDIT commands, the 
"cursor" refers to a pointer which is positioned at a 
character in the line being edited. 

To EDIT a line, type EDIT followed by the number of the 
line and hit the carriage return. The line number of the line 
being EDITed will be printed followed by a space. The cursor 
will now be positioned to the left of the first character in 
the line. 



• NOTE 

The best way of getting the "feel" of the EDIT command 
is to try EDITing a few lines yourself. 



If a command not recognized as an EDIT command is entered, the 
computer prints a bell (control/G) and the command is iqnored. 



In the following examples, the lines labelled "computer 
prints" show the appearance of the line after each command. 

a. Moving the Cursor. Typing a space moves the cursor 
to the right and causes the character passed over to be 
printed. A number preceding the space (n<space>) will cause 
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the cursor to pass over and print out n characters. Typing a 
Rubout causes the immediately previous character to be printed 
effectively backspacing the cursor. 

b. Inserting Characters 



WARNINGS: 



Character insertion is stopped by typing Escape 
(or Altmode on some terminals). Control/C will not 
interrupt the EDIT command while it is in Insert mode, 
but wili be inserted into the edited line. Therefore, 
Control/C should not be used in the EDIT command. 

It is possible using EDIT to create a line which, 
when listed with its line number, is longer than 72 
characters. Punched paper tapes containing such lines 
will not read proDeriy. However, such lines may be 
CSAVEd and CLOADed without error. 



I Inserts new characters into the line being edited. 

Each character typed after the I is inserted at the 
current cursor position and printed on the terminal. 
Typing Escape (or Altmode on some terminals) stops 
character insertion. If an attempt is made to insert 
a character that will make the line longer than 255 
characters, a Control/G (bell) is sent to the terminal 
and the character is not printed. 

A backarrow (or Rubout) typed during an insert command 
(or-) will delete the character to the left of the cursor. 
Characters up to the beginning of the line may be deleted in 
this manner, and a backarrow will be echoed for each character 
deleted. However, if there are no characters to the left of 
the cursor, a bell is echoed instead of a backarrow. If a 
carriage return is typed during an insert command, it is as if 
an escape and then carriage return were typed. That is, all 
characters to the right of the cursor will be printed and the 
EDITed line will reolace the original line. 

X X is similar to I, except that all characters to 

the right of the cursor are printed, and the cursor 
moves to the end of the line. At this point, it will 
automatically enter the insert mode ( see I command) . 
X is most useful whin new statements are to be added 
to the end of an existing line. For example: 
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User types EDIT 50 (carriage return) 

Computer prints 50 

User types x 

Computer prints 50 X=X+1 

User types :Y=Y+1(CR) 

Computer prints 50 X=X+1:Y=Y+1 

In the above example, the original line #50 was: 

50 X=X+1 

The new line #50 now reads: 

50 X=X+1:Y=Y+1 

H H is the same as X, exceot that all characters to 

the right of the cursor are deleted (they will not be 
printed). The insert mode (see I command) will then 
automatically be entered.- H is most useful when the 
last statements on a line are to be replaced with new 
ones. 

c. Deleting Characters 

D nD deletes n characters to the right of the cursor. 

If n is ommitted, it defaults to 1 . If there are less 
than n characters to the right of the cursor, 
characters will be deleted only to the end of . the 
line. The cursor is positioned to the right of the 
last character deleted. The characters deleted are 
enclosed in backslashes (\) . For example: 

User types 20 X=X+1:REM JUST INCREMENT X 

User types EDIT 20 (carriage return) 

Computer prints 20 

User types 6D (carriage return) 

Computer prints 20 \X»X+1:\REM JUST INCREMENT X 

The new line 20 will no longer contain the characters which 
are enclosed by the backslashes. 

d. Searching. 

S The nSy command searches for the nth occurrence of 

the character y in the line. N defaults to 1. The 
search skips over the first character to the right of 
the cursor and begins with the second character to the 
right of the cursor. All characters passed over 
during the search are printed. If the character is 
not found, the cursor will be at the end of the line. 
If it is found, the cursor will stop to the right of 
the character and all of the characters to its left 
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will have been printed. For example: 

User types , 50 REM INCREMENT X 

User types EDIT 50 

Computer prints 50 
User types 2SE 

Computer prints 50 REM INCR 

K nKy is equivalent to S except that all of the char- 
acters passed over during the search are deleted. The 
deleted characters are enclosed in backslashes. For 
example: 

User types 10 TEST LINE 

User types EDIT 10 

Computer prints 10 
User types KL 

Computer prints 10 \TEST \ 

e. Text Replacement. 

C A character in a line may be changed by the use of 

the command Cy which changes the character to the 
right of the cursor to the character y. Y is printed 
on the terminal and the cursor is advanced one 
position. nCy may be used to change n characters in a 
line as they are typed in from the terminal. (See 
example below.) If an attempt is made to change a 
character which does not exist, the change mode will 
be exited. Example: 

User types 10 FOR 1=1 TO 100 

User types EDIT 10 

Computer prints 10 

User types 2S1 

Computer prints 10 FOR 1=1 TO. 
User types 3C256 

Computer prints 10 FOR 1=1 TO 256 

. f. Ending and Restarting 

Carriage Return Terminates editing and prints the re- 
mainder of the line. The edited line replaces the 
original line. 

E E is the same as a carriage return except the 
remainder of the line is not printed. 

Q Q restores the original line and causes BASIC to 

return to command level. Changes do no^ take effect 
until an E or carriage return is typed, so Q allows 
the user to restore the original line without any 
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changes which may have been made. 

L causes the remainder of the line to be printed, 
and then prints the line number and restarts editinq 
at the beginning of the line. The cursor will be 
positioned to the left of the first character in the 
line. L allows monitoring the effect of changes on a 
line. Example: 



User types 


50 REM INCREMENT X 


User types 


EDIT 50 


Computer prints 


53 


User types 


2SM 


Computer prints 


50 REM INCRE 


User types 


L 


Computer prints 


50 REM INCREMENT X 




50 



A 



A causes the original line to be restored 
and editing to be restarted at the beginning 
line. For example: . 



of 



:he 



User types 
User types 
Computer prints 
User types 
Computer prints 
User types 
Computer prints 



10 TEST LINE 
EDIT 10 



10D 
10 \TEST LINE\ 

10 \TEST LINE\ 
10 



Suppose in the above example, that 
mistake when he deleted TEST LINE. 
A command, the original line 10 is 
ready for further editing. 



the user made a 
As a result of the 
reentered and is 



IMPORTANT 
Whenever a SYNTAX ERROR is discovered during the execution of 
"a source program , BASIC will automatically begin EDITing the 
line that caused the error as if an EDIT command had been 
typed. Example: 

10 APPLE 

RUN 

SYNTAX ERROR IN 10 

10 

Complete editing of a line causes the line edited to be 
reinserted. Reinserting a line causes all variable values to 
be deleted. To preserve those values for examination, the 
EDIT command mode may be exited with the Q command after the 
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line number is printed. If this is done, BASIC will return to 
command level and all variable values will be preserved. 



The features of the EDIT command may be used on the line 
currently being typed. To do this, type Control/A instead of 
Carriage Return. The computer will respond with a carriage 
return, an exclamation point (!) and a space. The cursor will 
be positioned at the first character of the line. At this 
point, any of the EDIT subcommands except Control/A may be 
used to correct the line. Example: 

User types 10 IF X GOTO #"/A 

Computer prints ! 

User types S# 2C12 

Computer prints ! 10 IF X GOTO 12 

The current line number may be designated by a period (.) 
in any command requiring a line number. Examples: 

User types 10 FOR 1= 1 TO 10 
User types EDIT . 
Computer prints 10 



5-5. PRINT USING Statement. 



The PRINT USING statement can be employed in situations 
where a specific output format is desired. This situation 
might be encountered in such applications as printing payroll 
checks or accounting reports. The general format for the 
PRINT USING statement is as follows: 

PRINT USING <string>;<value list> 

The <string> may be a string variable , string expression or a 
string constant which is a precise copy of the line to be 
printed. All of the characters in the string will be printed 
just as they appear with the exception of the formatting 
characters. The <value list> is a list of the items to be 
printed. The string will be repeatedly scanned until: 1) the 
string ends and there are no vaiues in the value list or, 2) a 
field is scanned in the string, but the value list is 
exhausted. The string is constructed according to the 
following rules: 
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a. String Fields. 

! specifies a single character string field. The string itself 
is specified in the value list. 

\n spaces\ specifies a string field consisting of 2+n char- 
acters. Backslashes with no spaces between them 
indicates a field 2 characters wide, one space between 
them indicates a field 3 characters wide, etc. 

in both cases, if the string has more characters than the 
field width, the extra characters will be ignored. If the 
string has fewer characters than the field width, extra spaces 
will be printed to fill out the entire field. Trying to print 
a number in a string field will cause a TYPE MISMATCH error to 
occur. Example: 

10 A$="ABCDE":B?="FGH" 
20 PRINT USING "!";A$;B$ 
30 PRINT USING "\ \";B$;A$ 
RUN 

(the above prints out) 

AF 

FGH ABCD 

Note that where the "!" was used only the first letter of each 
string was printed. Where the backslashes enclosed two 
spaces, four letters from each string were printed {an extra 
space was printed for B$ which has only three characters) . 
The extra characters in the first case and for A$ in the 
second case were ignored. 

b. Numeric Fields. With the PRINT USING statement, 
numeric printouts may be altered to suit almost any 
application. Strings for formatting numeric fields are 
constructed from the following characters: 

# Numeric fields are specified by the # sign, each of 

which represents a digit position. These digit 
positions are always filled. The numeric field is 
right justified; that is, if the number printed is 
too small to fill all of the digit positions 
specified, leading spaces are printed as necessary to 
fill the entire field. 

The decimal point may be specified in any position 
in the field. Rounding is performed as necessary. If 
the field format specifies that a digit is to precede 
the decimal point, the digit is always printed (as 
if necessary) . 
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The following program will help illustrate these rules: 

10 INPUT A$,A 

20 PRINT USING A$;A 

30 GOTO 10 

RUN 

? ##,12 

12 
? ###,12 

12 
? #####,12 

12 
?##.##, 12 

12.00 
? ###.,12 

12. 
? #.###,.02 

0.020 
?##.#, 2. 36 

2.4 
?###,-12 

-12 
?#.##, -.12 

-.12 
?####, -12 
-12 

+ The + sign may be used at either the beginning or 

end of the- numeric field. If the number is positive, 
the + sign is printed at the specified end of the 
number. If the number is negative, a - sign is 
printed at the specified end of the number. 

The - sign, when used to the right of the numeric 
field designation, forces the minus sign to be printed 
to the right of the number if it is negative. If the 
number is positive, a space is printed. 

** The ** placed at the beginning of a numeric field 

designation causes any unused spaces in the leading 
portion of the number printed out to be filled with 
asterisks. The ** also specifies oositions for 2 more 
digits. (Termed "asterisk fill") 

$'$ When the $$ is used at the beginning of a numeric 

field designation, a $ sign is printed in the space 
immediately preceding the number printed. Note that 
$$ also specifies positions for two more digits, but 
that the $ itself takes up one of these spaces. 
Exponential format cannot be used with leading $ 
signs. 
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**$ The **$ used at the beginning of a numeric field 

designation causes both of the above (** and $$) 'to be 
performed on the number being printed out. All of the 
previous conditions apply, except that **$ allows for 
3 additional digit positions, one of which is the $ 
sign. 

, h comma appearing to the left of the decimal point 

in a numeric field designation causes a comma to be 
printed to the left of every third digit to the left 
of the decimal point in the number being printed, the 
comma also specifies another digit position. A comma 
to the right of the decimal point in a numeric field 
designation is considered a part of the string itself 
and is treated as a printing character. 

(MM on some terminals) Exponential Format. 
If exponential format is desired in the printout, the 
numeric field designation should be followed by 
(allows space for E+XX) . Any decimal point 
arrangement is allowed. The significant digits are 
left justified and the exponent is adjusted. Unless a 
leading + or a trailing + or - is used, one position 
to the left of the decimal point is used to orint a 
space or minus sign. Examples: 

PRINT USING " [## ]"; 13,17,-8 
[ 1E+01] [ 2E+01] [-8E+00] 
OK 

PRINT USING ■■[.###### -] , 12345,-123456 

[.123450E+05 ] [.123456E+36-] 
OK 

PRINT USING "[+.## ]"; 123,-126 
[+.12E+03] [-.13E+03] 
OK 

% If the number to be printed out is larger than the 

specified numeric field, a % character is printed 
followed by the number itself in standard Altair BASIC 
• format. (The entire number is printed.) If rounding a 
number causes it to exceed the specified field, the % 
character is printed followed by the rounded number. 
If, for example, A=.999, then 

PRINT USING ".##", A 

prints 

%1.00. 

If the number of digits specified exceeds 24, an 
ILLEGAL FUNCTION CALL error will occur. 
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The following program will help illustrate the preceding 
rules. 

Program: 10 INPUT A$,A 

20 PRINT USING A$;A 

30 GOTO 10 

RUN 

The computer will start by typing a ?. The numeric field 
designator and value list are entered and the output is 
displayed as follows: 

? +#,9 

+9 

? +#,10 

%+10 

? ##,-2 

-2 

? +#,-2 

-2 

? #,-2 

%-2 

? +.###,.02 

+ .020 

? ####.#,100 

100.0 
? ##+,2 

2+ 

? THIS IS A NUMBER ##,2 

THIS IS A NUMBER 2 

? BEFORE ## AFTER, 12 

BEFORE 12 AFTER 

? ####,44444 

%44444 

? **##,1 
***]_ 

? **##,12 

**12 

? **##,123 

*123 

? **##,1234 

1234 

? **##, 12345 

%12345 

-> ** i 
• , J- 

*1 

? **,22 

22 

? **.##, 12 
12.00 

? **####, 1 
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(note: not floating $) ? $####.## ,12.34 

$ 12.34 
(note: floating $) ? $$####.## ,12. 56 

$12.56 
? $$.##,1.23 
$1.23 

? $$.##,12.34 
%$12.34 
? $$###,0.23 

$0 
? $$####.##,0 

$0.00 
? **$###. ##,1.23 
****$!. 23 
. ? **$.##, 1.23 
*$1.23 
? **$###, 1 

? #,6.9 

7 

? #.#,6.99 

7.0 

? ##-,2 

2 
? ##-,-2 

2- 
? ##+,2 

2+ 
? ##+,-2 

2- 
? ## — "-,2 

2E+00 
? ## ,12 

1E+01 
? #####.### ,2.45678 

2456.780E-03 

? #.### ,123 

0.123E+03 

? #.## ,-123 

-.12E+03 

? "#####,###.#",1234567.89 

1,234,570.0 



Typing Control/C will stop the program. 

5-5. Disk File Operations. 

As many as sixteen floppy disks may be connected to a 
single ALTAIR disk controller. These disks have been assigned 
the physical disk numbers through 15. Users with one drive 
should address the drive at zero, and users with two drives 
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should address them at zero and one, etc. 

In the following descriptions, <disk number> is an 
integer expression whose value is the physical number of one 
of the disks in the system. If the <disk number> is omitted 
from a statement other than MOUNT or UNLOAD, the <disk number > 
defaults to 0. If the <disk number> is omitted from a MOUNT 
or UNLOAD statement, disks through the highest disk number 
specified at initialization are affected. 

a. Opening, Closing and Naming Files. To initialize 
disks for reading and writing, the the MOUNT command is issued 
as follows: 

MOUNT [<disk number> [ ,<disk number>...]3 
Example: 

MOUNT 
mounts the disk on drive zero, and 

MOUNT 0,1 

mounts the disks on drives zero and one. If there is already 
a disk MOUNTed on the specified drive (s) a 
DISK ALREADY MOUNTED message will be printed. Before removing 
a disk which has been used for reading and writing by Disk 
Altair BASIC, the user should give an UNLOAD command: 

UNLOAD [<disk number> [ ,<disk number>...]] 

UNLOAD closes all the files open on a disk, and marks the disk 
as not mounted. Before any further I/O is done on an UNLOADed 
disk, a MOUNT command must be. given. 



NOTE 

MOUNT, UNLOAD or any other disk command may be used as 
a program statement. 



All data and program files on the disk have an associated file 
name. This name is the. result of evaluating a string 
expression and must be one to eight characters in length. The 
first character of the file name cannot be a null . (0) bvte or 
a byte of 255 decimal. An attempt to use a null file name 
(zero characters in length) , a file name over 8 characters in 
length or containing a or 255 in the first character 
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position will cause a BAD FILE NAME error. Any other sequence 
of one to eight characters is acceptable. 

Examples of valid file names: 

ABC 

abc (Not the same as ABC) 

filename 

f ile.ext 

12345678 

INVNTORY 

FILE##22 



NOTE 

Commands that require a file name will use <file name) 
in the appropriate position. Remember that a <file 
name> can be any string expression as long as the 
resulting string follows the rules given above. 



b. The FILES Command. The FILES command is used to 
print out the names of the files residing on a particular 
disk. The format of the FILES command is: 

FILES <disk number> 

Example: 

FILES (prints directorv of files on disk 0) 

STRTRK PIP CURFIT CISASM 

Execution of the FILES command may be interrupted bv typing 
Control/C. A more complete listing of the information stored 
in a particular file may be obtained by running the PIP 
utility program (see Appendix I) . 

c. SAVEing and LOADing programs. Once a program has 
been written, it is often desirable to save it on a disk for 
use at a later time. This is accomplished by issuing a SAVE 
command : 

SAVE <file name>[,<disk number>[,A]] 
Example: 

SAVE "TEST" ,0 
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or 



SAVE "TEST" 



would save the program TEST on disk zero. Whenever a program 
is SAVEd, any existing copy of the program previously SAVEd 
will be deleted, and the disk space used by the previous 
program is made available. See section 5-6d for a discussion 
of saving with the "A* option. 



The LOAD statement reads a file from disk and loads it 
into memory. The syntax of the LOAD statement is: 

LOAD <file name> [ ,<disk number >[,R]] 

Correspondingly: 

LOAD "TEST",0 or LOAD "TEST" 

loads the program TEST from disk zero, 
exist, a FILE NOT FOUND error will occur. 

LOAD "TEST",0,R 

OK 



If the file does not 



LOADs .the program TEST 
command with the "R" opt 
programs into small pi 
to fit in the computer's 
lines are deleted by 
OPEN (see below) if th 
information may be pass 
disk data files. If the 
automatically CLOSEd (se 

Example: 



from disk zero and runs it. The LOAD 
ion may be used to chain or segment 
eces if the whole program is too large 

memory. All variables and program 

LOAD, but all data files are kept 
e "R" option is used. Therefore, 
ed between programs through the use of 

"R" option is not used, all files are 
e below) by a LOAD. 



NEW 

10 PRINT "FOOl" :LOAD "FOO2",0,R 

SAVE "FOO1",0 

OK 

10 PRINT "F002" :LOAD "FOO1",0,R 

SAVE "F002" ,0 

OK 

RUN 

F002 

FOOl 

F002 
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F001 

(Control/C may be used to stop execution at this point) 

In this example, program F002 is RUN. F002 prints the 
message "F002" and then calls the Drogram F001 on disk. FOOl 
prints "FOOl" and calls the program F002 which prints "F002" 
and so on indefinitely. 

RUN may also be used with a file name to load and run a 
program. The format of the command is as follows: 

RUN<file name) [ ,<disk number>[,R]] 

All files are closed unless ,R is specified after the disk 
number . 



d. SAVEing and LOADing Program Files in ASCII. Often it 
is desirable to save a program in a form that allows the 
program text to be read as data by another program, such as a 
text editor or resequencing program. Unless otherwise 
specified, Altair BASIC saves its programs in a compressed 
binary format which takes a minimum of disk space and loads 
very quickly. To save a program in ASCII, specifv the "A" 
option on the SAVE command: 



SAVE "TEST" ,0, A 

OK 

LOAD "TEST",0 

OK 



Information in, the file tells the LOAD command the format 
in which the file is to be- loaded. The first character of an 
ASCII file is never 255, and a binary program file always 
starts with 255 (377 octal). Remember, loading an ASCII file 
is much slower than loading a binarv file. 



e. The MERGE Command. Sometimes it is very useful to 
put parts of two programs together to form a new program 
combining elements of both programs. The MERGE command" is 
provided for this purpose. As soon as the MERGE command has 
been executed, 3ASIC returns to command level. ' Therefore, it 
is more likely that MERGE would be used as a direct command 
than as a statement in a program. The format of the MERGE 
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statement is as follows: 

MERGE <file name) [ ,<disk number>] 

Example: 

MERGE "PRINTSUB",1 
OK 

The <file name) specified is merged into the program already 
in memory. The <file name> must specify an ASCII format saved 
program or a BAD FILE MODE error will occur. If there are 
lines in the program on disk which have the same line numbers 
as lines in the program in memory, the lines from the file on 
disk will replace the corresponding program lines in memory. 
It is as if the program lines of the file on disk were typed 
on the user terminal. 

f. Deleting Disk Files. The KILL statement deletes a 
file from disk and returns disk space used by the file to free 
disk space. The format of the KILL statement is as follows: 

KILL <file name>[,<disk number>] 

If the file does not exist, a FILE NOT FOUND error will occur. 
If a KILL statement is given for a file that is currently OPEN 
(see below), a FILE ALREADY OPEN error occurs. 

g. Renaming Files - the NAME Statement. The NAME 
statement is used to change the name of a file: 

NAME <old file name> AS <new file name>[,<disk number>] 

Example: 

NAME "OLDFILE" AS "NEWFILE" 

The <old file name> must exist, or a FILE NOT FOUND error will 
occur. A file with the same name as <new file name) must not 
exist or a FILE ALREADY EXISTS error will occur. After the 
NAME statement is executed, the file exists on the same disk 
in the same area of disk space. Only the name is changed. 

h. OPENing Data Files. Before a program can read or 
write data to a disk file, it must first OPEN the file on the 
appropriate disk in one of several modes. The general form of 
the OPEN statement is: 

OPEN <mode>, [#] <f ile number > ,<file name>[,<disk number>] 
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<mode> is a string expression whose first character is one of 
the following: 



Specifies sequential output mode 

1 Specifies sequential input mode 

R Specifies random Input/Output mode 

A sequential file is a stream of characters that is read or 
written in order much like INPUT and PRINT statements read 
from and write to the terminal. Random files are divided into 
groups of 128 characters called records. The nth record of a 
file may be read or written at any time. Random files have 
other attributes that will be discussed later in more detail. 



<file number> is an integer expression between one and 
fifteen. The number is associated with the file being OPENed 
and is used to refer to the file in later I/O operations. 

Examples: 

OPEN "0", 2 , "OUTPUT" ,0 
OPEN *'I",1, "INPUT" 

The above two statements open the file OUTPUT for sequential 
output and the file INPUT for sequential input on disk zero. 
The following statement opens the file whose name is in the 
string F$ in mode M$ as file number N on disk D. 

OPEN M$,N,F$,D 



i. Sequential ASCII file I/O Sequential input and output 
files are the simplest form of disk input and output since 
they involve the use of the INPUT and PRINT statements with a 
file that has been previously OPENed. 

1) INPUT is used to read data from a disk file as 
follows: 

INPUT ■ #<f ile number>,<variable list> 

where <file number> represents the number of the file that was 

OPENed for input and <variable list> is a list of the 

■variables to be read, as in a normal INPUT statement. When 

data is read from a sequential input file using an INPUT 

statement, no question mark (?) is printed on the terminal. 

The format of data in the file should appear exactly as it 

would be typed to a standard INPUT statement to the terminal. 
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When reading numeric values, leading spaces, carriage returns 
and line feeds are ignored. When a non-space, non-carriage 
return, non-line-feed character is found, it is assumed to be 
part of a number in Altair BASIC format. The number 
terminates on a space, a carriage return, line-feed or a 
comma . 

Leading blanks, carriage returns and line-feeds are also 
ignored when scanning for string items. When a character 
which is not a leading blank, carriage return or line-feed is 
found, it is assumed to be the start of a string item. If this 
first character is a quotation mark (") , the item is taken as 
being a quoted string, and all characters between the first 
quotation mark (") and a matching quotation mark are returned 
as characters in the string value. This means that a auoted 
string in a file may contain any characters except double 
quote. If the first character of a string item is not a 
quotation mark, then it is assumed to be an unquoted string 
constant. The string returned will terminate on a comma, 
carriage return or line feed. The string is immediately 
terminated after 255 characters have been read. 

For both numeric and string items, if end of file (EOF) 

is reached when the item is being INPUT, the item is 

terminated regardless of whether or not a closing quote was 
seen. 

Sequential I/O commands destroy the input buffer so they 
may not be edited by Control/A for re-execution. 



Example of sequential I/O (numeric items) : 

500 OPEN "O",1,'«FILE",0 

510 PRINT #1,X,Y,2 

520 CLOSE 1 

530 OPEN "I",1,"FILE",0 

540 INPUT #1",X,Y,Z 

Note that CLOSE is used so that a file which has just been 
written may be read. When FILE is re-OPENed, the data pointer 
for that file is set back to the beginning of the file so that 
the first INPUT on the file will read data from the start of 
the file. 

2) PRINT and PRINT USING statements are used to write 
data into a sequential output file. Their formats are as 
follows: 

PRINT #<file number> ,<expression list> 
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or 

PRINT #<file number>, <line feed> 

USING <string expression>;<expression list> 

Example of sequential I/O (quoted string items) : 

500 OPEN "CM, "FILE" 

510 PRINT #1,CHR$(34) ;X$;CHR$(34) ; 

515 PRINT #1,CHR$(34) ; Y$ ;CHR$ (34) ;CHR$(34) ?Z$;CHR$(34) 

520 CLOSE 1 

530 OPEN "I", 1, "FILE" ,0 

540 INPUT #1,X$,Y$,ZS 

In this example, the strings being output (XS, Y$ , ' Z$) are 
surrounded with double quotes through the use of the CHR$ 
function to generate the ASCII value for a double quote. This 
technique must be used if a string which is being output to a 
sequential data file contains commas, carriage returns, 
line-feeds or leading blanks that are significant. When 
leading blanks are not significant and there are no commas, 
carriage returns or line-feeds in the strings to be output, it 
is sufficient to insert commas between the strings being 
output as in the following example: 

500 OPEN "0" ,1,"FILE" 

510 PRINT #1,X$;"," ? Y$;", M ;Z$ 

520 CLOSE 1 

530 OPEN "I",l, 'FILE M ,0 

540 INPUT #1,X$,Y$,Z$ 



3) CLOSE. The format of the CLOSE statement is as 
follows : 

CLOSE [<file number> [,<file number>...]1 

CLOSE is used to finish I/O to a particular Altair BASIC data 
file. After CLOSE has been executed for a file, the file may- 
be reOPENed for input or output on the same or different <file 
number>. A CLOSE for a secuential output file writes the 
final buffer of output. A CLOSE to any OPEN file finishes the 
connection between the <file number> and the <file name) given 
in the OPEN for that file. It allows the <file number> to be 
used again in another OPEN statement. 

A CLOSE with no argument CLOSES all OPEN files. 
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NOTE 

A FILE can be OPSNed for sequential input or random 
access on more than one <file number> at a time but 
may be OPEN for output on only one <file number> at a 
time. 



END and NEW always CLOSE all disk files automatically. STOP 
does not CLOSE disk files. 

4) LINE INPUT. It is often desirable to read a whole 
line of a file into a string without using quotes, commas or 
other characters as delimiters. This is especially true if 
certain fields of each line are being used to contain data 
items, or if a BASIC program saved in ASCII mode is being read 
as data by another program. The facility provided to perform 
this function is the LINE INPUT statement: 

LINE INPUT #<file number> ,<string variable> 

A LINE INPUT from a data file will return all characters up to 
a carriage return in <string variable>.. LINE INPUT then skips 
over the following carriage return/line-feed sequence so that 
a subsequent LINE INPUT from the file will return the next 
line. 

5) End of File (EOF) Detection. When reading a 
sequential data file with INPUT statements, it is usually 
desirable to detect when there is no more data in the disk 
file. The mechanism for detecting this condition is the. EOF 
function: 

X=EOF(<file number>) 

EOF returns TRUE (-1) when there is no more data in the file 
and FALSE (0) otherwise. If an attempt is made to INPUT past 
the end of a data file, an INPUT PAST END error will occur. 

Example: 

100 OPEN " I",l, "DATA", 

110 1=0 

120 IF EOF(l) THEN 160 

130 INPUT #1,A(I) 

140 1=1+1 

150 GOTO 120 

160 

In this example, numeric data from the sequential input file 
DATA is read into the array A. When end of file is detected, 
the IF statement at line 120 branches to line 160, and the 
variable I "points" one beyond the last element of A that was 
INPUT from the file. 
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The following is a program that will calculate the number 
of lines in a BASIC program file that has been SAVEd in ASCII 
mode: 

10 INPUT "WHAT IS THE NAME OF THE PROGRAM" ;P$ 

20 OPEN "I" ,1,P$,0 

30 1=0 

40 IF EOF(l) THEN 70 

50 1=1+1: LINE INPUT #1,L$ 

60 GOTO 40 

70 PRINT "PROGRAM " ;P$;" IS ";I;" LINES LONG" 

80 END 

This example uses the LINE INPUT statement to read each line 
of the program into the "dummy" string L$ which is used just 
to INPUT and ignore that part of the file. 

6) Finding the Amount of Free Disk Space (DSKF) . It is 
sometimes necessary to determine the amount of free disk space 
remaining on a particular disk before writing a file. The 
DSKF function provides the user with the number of free groups 
left on a given disk after the disk has been MOUNTed. A group 
is the fundamental unit of file allocation. That is, files 
are always allocated in groups of eight sectors at a time. 
Each sector contains 128 characters (bytes). Therefore, the 
minimum size for a file is 1024 bytes. 

Syntax for the DSKF function: 

DSKF(<d'isk number >) 

Example: 

PRINT DSKF(0) 
200 



The above 
characters 



example shows that there are 
(bytes) that can still be stored on 



200*1024=204300 
disk zero. 



j. RANDOM FILE I/O. Previous 
data may be PRINTed or INPUT 
However, it is often desirable to 
fashion, for instance, to retrieve 
part number or customer from a lar 
floppy disk. If sequential fil 
'wouid have to be scanned from the 
item was found. Random files 
allow a program to access any reco 
last in a speedy fashion. Also 
from variables to the disk ouput r 
much faster, more efficient fa 



ly, we have discussed how 

from sequential data files. 

access data in a random 

information on a particular 

ge data base stored on a 

es were used, the whole file 

start until the Particular 

remove this restriction and 

rd from the first to the 

, random files transfer data 

ecords and vice versa in a 

shion than sequential files. 
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Random file I/O is more complex than seauential I/O, and it is 
recommended that beginners try sequential I/O first. 



1) OPENing a FILE for Random I/O. Random I/O files 'are 
OPENed just like sequential files. 

OPEN " R" , 1," RANDOM", 

When a file is OPENed for random I/O, it is always OPEN for 
both input and output simultaneously. 



2) CLOSING Random Files. Like sequential files, random 
files must be closed when I/O operations are finished. To 
CLOSE a random file, use the CLOSE command as described 
previously. 

CLOSE <file number> [ ,<f ile number >...] 



3) Reading and writing data to a random file - GET and 
PUT. Each random file has associated with it a "random 
buffer" of 128 bytes. When a GET or PUT operation' is 
performed, data is transferred directly from the buffer to the 
data file or from the data file to the buffer. 
The syntax of GET and PUT is as follows: 

PUT [#]<file number> [ ,<record number>] 

GET [#]<file number> [ ,<record number>] 

If <record number > is omitted from a GET or PUT statement, the 
record number that is one higher than the previous GET or PUT 
is read into the random buffer. Initially a GET or PUT 
without a record number will read or write the" first record. 
The largest possible record number is 2046. If an attempt is 
made to GET a record which has never been PUT, all zeroes are 
read into the record, and no error occurs. 



4) LOC and LOF. LOC is used to determine what the 
current record number is for random files. In other words, it 
returns the record number that will be used if a GET or PUT is 
executed with the <record number> parameter omitted. ' 
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LOC(<file number >) 

PRINT LOC(l) 
15 



LOC is also valid for sequential files, and gives the number 
of sectors (128 byte blocks) read or written since the OPEN 
statement was executed. 



LOP is used to determine the last record number written to a 
random file: 

LOF(<file number>) 

PRINT LOF(2) 
200 

An attempt to use LOF on a seauential file will cause a 3A.D 
FILE MODE error. 

The value returned by LOF is always 5 MOD 8. That is , when 
the value LOF returns is divided by 8, the remainder is always 
5. Therefore, the values returned by LOF are 5, 13, 21, 29 
etc. This is due to the way random files are allocated. 



NOTE 

It is important to note that the value returned by LOF 
may be a record that has never been written in by a 
user program. This is because of the way random files 
are pre-extended. 



5) Moving Data In and Out of the Random Buffer. So far 
we have described techniques for writing (PUT) and reading 
(GET) data from a file into its associated random buffer. Mow 
we will describe how data from string variables is moved to 
and from the random buffer itself. This is accomplished 
through the use of the FIELD, LSET and RSET statements. 



6) FIELD. The FIELD statement associates some or all of 
a file's random buffer with a particular string variable. 
Then, when the file buffer is read with GET or written with 
PUT, string variables which have been FIELDed into the buffer 
will automatically have their contents read or written. The 
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format of the FIELD statement is: 

FIELD [#] <file number >,<field size> AS <string variable> [ . . . ] 

<file number> is used to specify the file number of the file 
whose random buffer is being referenced. If the file is not a 
random file, a BAD FILE MODE error will occur. <field size> 
sets the length of the string in the random buffer. <string 
variable> is the string variable which is associated with a 
certain number of characters (bytes) in the buffer. Multiole 
fields may be associated with string variables in a given 
FIELD statement. Each successive string variable is assigned 
a successive field in the random buffer. Example: 

FIELD 10 AS A?, 20 AS B$, 30 AS C? 

The statement above would assign the first 10 characters of 
the random buffer to the string variable A$ , the next 20 
characters to B$ and the next 30 characters to the variable 
C$. It is important to note that the FIELD statement does not 
cause any data to be transferred to or from the random buffer. 
It only causes the string variables given as arguments to 
"point" into the random buffer. 

Often, it is necessary to divide the random buffer into a 
number of sub-records to make more efficient use of disk 
space. For instance, it might be desirable to divide the 128 
character record into two identical subrecords. To accomplish 
this a "dummy variable" would be placed in the FIELD statement 
to represent one of the subrecords. One of the following 
statements would be executed, depending on whether the first 
or second subrecord were needed: 

FIELD #1,64 AS D$ , 20 AS NAME?, 

20 AS ADDRESSES, 24 AS OCCUPATIONS 

or 

FIELD #1,20 A3 NAME?, 20 AS ADDRESSES, 
24 AS OCCUPATIONS, 64 AS D$ 

where the dummy variable D$ is used to skip over one of the 
subrecords. Another way to do the same thing would be to set 
a variable I that would select the first or second subrecord: 



FIELD #1,64*(I-1) AS D$ , 

20 AS NAME?, 20 AS ADDRESS?, 24 AS OCCUPATION? 

Here, if the variable I is one, 1-1 *64 =0 characters will be 
skipped over, selecting the first subrecord. If I is two, 64 
characters will be skipoed over, selecting the second 
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subrecord. Another useful technique is to use a FOR... NEXT 
loop and an array to set up subrecords in the random buffer: . 

1000 FOR 1=1 TO 16 

1010 FIELD #1, (I-l)*8 AS D$, 4 AS A$(I), 

4 AS 3$ (I) 
1020 NEXT I 

In this example, we have divided the random buffer into 16 
subrecords composed of two fields each. The first 4-character 
field is in A$ (X) X is the subrecord number. 



NOTE 

The FIELD statement may be executed any number of 
times on a given file. It does not cause any 
allocation of string space. The only space allocation 
that occurs is for the string variables mentioned in 
the FIELD statement. These string variables have a 
one byte count and two byte oointer set up which 
points into the random buffer for the specif ied" file. 



7) Using Numeric Values in Random Files: MKI$, MKS$, 
MKD$ and CVI , CVS, CVD. As we have seen, data is always 
stored in the random buffer through the use of string 
variables. In order to convert between strings and numbers 
and vice versa, a number of special functions have been 
provided. 

To convert between numbers and strings: 



MKI$ (<integer value>) 



MKS$(<single precision value>) 
MKD$(<double precision value>) 



Returns a two byte string 
(FC error if value is not 
>=-32768 and <=+32767. 
Fractional part is lost) 
Returns a four byte string 
Returns an eight byte string 



To convert between strings and numbers: 



CVI(<two byte string>) 
CVS(<four byte string>) 
CVD(<eight byte string>) 



Returns an integer value 
Returns a single precision value 
Returns a double orecision value 



CVI, CVS, and CVD all qive an ILLEGAL FUNCTION CALL error if 



3ASIC 4.1 
April, 1577 



65 



the string given as the argument is shorter than required. If 
the string argument is longer than necessary/ the extra 
characters are ignored. These functions are extremely fast 
since they convert between Altair BASIC'S internal 
representations of integers, single and double precision 
values and strings. Conventional sequential I/O must perform 
time-consuming character scanning algorithms when converting 
between numbers and strings. 

8) LSET and RSET. When a GET operation is performed, all 
string variables which have been FIELDed into the random 
buffer for that file automatically have values assigned to 
them. The CVI, CVS and CVD functions may be used to convert 
any numeric fields in the record to their numeric values. 
When going the other way, i.e. inserting strings into the 
random buffer before performing a PUT statement, a problem 
arises. This is because of the way string assignments usually 
take place. For example: 

LET A$=3$ 

When a LET statement is executed, 3$ is copied into string 
space, A$ is pointed to the new string and the string length 
of A$ is modified. However, for assignments into the random 
buffers we do not want this to happen. Instead, we want the 
string being assigned to be stored where the string variable 
was FIELDed. In order to do this, two special assignment 
statements have been provided, LSET and RSET: 

LSET <string variable>=<string expression> 

RSET <string variable>=<string expression> 

Examples : 

"LSET A$=MKS$ (V) 

RSET B$="TEST" 

LSET CS (I)=MKD$ (D#) 

The difference between LSET and RSET concerns what happens if 
the string value being assigned is shorter than the length 
specified for the string variable in the FIELD statement. 
LSET left justifies the string, adding blanks (octal 40, 
decimal 32) to pad out the right side of the string if it is 
too short. RSET right justifies the string, padding on the 
left. If the string value is too long, the extra characters 
at the end of the string are ignored. 
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NOTE 

Do not use LSET or RSET on string variables which have- 
not been mentioned in a FIELD statement, or a SET TO 
NON DISK STRING error will occur. 



k. The DSKI? and DSKO$ Primitives. Often it is 
necessary for the user to perform disk I/O operations directly 
without using any of the normal file structure features of 
Altair BASIC. To allow this, two special functions have been 
provided. These are the DSKI$ function and the DSKO$ 
statement. First, examples will be provided on how to perform 
simple disk I/O commands using Altair BASIC statements. 

To Enable disk 0: 

OUT 8,0 
To Enable disk N: 

OUT 8,N 
TO step the disk head out one track: 

WAIT 8,2,2:OUT'9,2 
To step the disk head in one track: 

WAIT 8,2,2:OUT 9,1 
To test for track 0: 

IF (INP(8) AND 64)=0 THEN ^statements or line number> 

The above will execute the statements or branch to the line 
number if the head is positioned at track 0. This is the 
outermost track on the disk. 

To read sector Y (Y may be any expression, minimum sector =0, 
maximum = 31) : 

A$=DSKI$(Y) 

The statement 

DSKO$ <string exoression> ,<sector expression> 
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writes the string expression on the sector specified. The 
high order bit (most signifigant) of the first character 
output will always be set to one when the string is written on 
the sector and will always be one when the sector is read back 
in using DSKI$. A maximum of 137 characters are written; 
giving a string whose length exceeds 137 characters will cause 
an ILLEGAL FUNCTION CALL error. If the string argument is 
less than 137 characters in length, the end of the string will 
be padded with zeros to make a string of length 137. 
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§.i ^ISTS AND DIREC TORI ES 
6-1. Commands. 



Commands direct Altair BASIC to arrange memory and 
input/output facilities, to list and edit programs "and "to 
handle other housekeeping details in support of program 
execution. Altair BASIC accepts commands after it prints 'OK* 
and is at command level. The table below lists the commands 
in alphabetical order. The notation to the right of the 
command name indicates the versions to which it applies. 

.Command Version (s) 

CLEAR All 

Sets all program variables to zero. 

CLEAR[<expression>] 8K, Extended, Disk 

Same as CLEAR but sets string space to the value of the 
expression. .If no argument is given, string space will remain 
unchanged. When Altair BASIC is loaded, string space is set 
to 50 bytes in 8K and 200 bytes in Extended and Disk. 

CLOAD< string expression> 8K (cassette) , Extended, Disk 

Causes the program on cassette tape designated by the first 
character of STRING expression> to be loaded into memory.' A 
NEW command is issued before the program is loaded. 

CLO AD *< array name> 8K (cassette) , Disk 

Loads the specified array from cassette tape. iMay be used as 
a program statement. 

CLOAD?<string expression> 8K (cassette) , Extended , Disk 

Compares the program in memory with the corresponding file on 

cassette tape. If the files are the same, CLOAD? prints OK. 

If not, it prints NO GOOD. The <string expression> must be 
given, but it is ignored. 

-CONT 8K, Extended, Disk 

Continues program execution after a Control/G has been typed 
or a STOP or END statement has been executed. Execution 
resumes at the statement after the break occurred unless input 
from the terminal was interrupted. In that case, execution 
resumes with the reprinting of the prompt (? or prompt 
string). CONT is useful in debugging, especially where an 
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'infinite loop* is suspected. An infinite loop is a series of 
statements from which there is no escape. Typing Control/C 
causes a break in execution and puts BASIC in command level. 
Direct mode statements can then be used to print intermediate 
values, change the values of variables, etc. Execution can be 
restarted by typing the ,CONT command, or by executing a direct 
mode GOTO statement, which causes execution to resume at the 
specified line number. 

In 4K and 8K Altair BASIC, execution cannot be continued 
if a direct mode error has occured during the break. In all 
versions, execution cannot continue if the program was 
modified during the break. 

CSAVE<string expression 8K (cassette) , Extended, Disk 

.Causes the program currently in memory to be saved on cassette 
tape under the name specified by the first character of 
<string expression . 

CSAVE*<array name> 8K (cassette) , Disk 

Causes the array named to be saved on cassette tape. May be 
used as a program statement. 

DELETEOline number> Extended, Disk 

Deletes the line in the current program with the specified 
number. ,If no such line exists, an ILLEGAL FUNCTION CALL 
error occurs. 

DELETE-<line number> Extended, Disk 

Deletes every line of the current program up to and including 
the specified line. If there is no such line, an ILLEGAL 
FUNCTION CALL error occurs. 

DELETE<line number >-<51ine number> Extended, Disk 

Deletes all lines of the current program from the first line 
number to the second inclusive. ILLEGAL FUNCTION CALL occurs 
if no line has the second number. 

DSKINKdrive number> Disk 

Initializes diskettes on the specified drives by marking all 
sectors in tracks 6 - 77 as free. If no disk number is given, 
all disks are initialized beginning with the highest disk 
number. CAUTION: DSKINI destroys all files on the disk. Use 
with utmost caution. 

EDIT<line number> Extended, Disk 
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Allows editing of the line specified without affecting any 
other lines. The EDIT command has a powerful set of 
sub-commands which are discussed in detail in section 5-4. • 

LIST All 

Lists the program currently in memory, starting with the 
lowest numbered line. Listing is terminated either by the end 
of the program or by typing Control/C. 

The LIST command may be used to save programs on paper 
tape. Simply type LIST and turn on the teletype's paper tape 
punch before typing carriage return. Be sure the nulls have 
been set (see NULL command) to 3 before punching the program. 
To load a program from paper tape, put the tape "in the 
teletype's reader and turn it on. The program loads as if it 
were being typed from the terminal. The NEW command may be 
used to "clear old program lines before loading the new 
program. 

LIST[<line number>] All 

In 4K and 8X, prints the current program beginning at the 
specified line. In Extended and Disk, prints the specified 
line if it exists. 

LIST[<line number>] [-<line number>] Extended, Disk 

Allows several listing options. 

1. If the second number is omitted, lists all dines with 
numbers greater than or equal to the number specified. 

2. If the first number is omitted, lists all lines from the 
beginning of the program to the specified line, inclusive. 

3. If both line numbers are used, lists all lines from the 
first number to the second, inclusive. 

LLIST[<line number >] [-<iine number>] Extended, Disk 

Same as list with the same options, except prints on the line 
printer. 

NEW All 

Deletes the current program and clears all variables. Used 
before entering a new program. 

NULL<integer expression> 8K, Extended, Disk 
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Sets the number of nulls to be printed at the end of each 
line. For 10 or 30 character per second tape punches, 
<integer expression> should be >=3. When tapes are not being 
punched, <integer expression> should be or 1 for Teletypes" 
and Teletype compatible .CRT's. It should be 2 or 3 for 30 cps 
hard copy printers. The default value is 0. In the -4K 
version, the same affect may be achieved by patching location 
46 octal to contain the number of nulls plus 1. 

* Teletype is a registered trademark of the Teletype 
Corporation. 



RUN[<line number >] 



All 



Starts execution of the program currently in memory at the 
line specified. If the line number is omitted, execution 
begins at the lowest line number. Line number specification 
is not allowed in 4K. 



6-2 



Statements . 



The following table of statements is listed in alpahabetical 
order. The notation in the Version column designates the 
versions to which each statement applies. In the table, X and 
Y stand for any expressions allowed in the version under 
consideration. I and J stand for expressions whose values are 
truncated to integers. V and w are any variable names. The 
format for an Altair BASIC line is as follows: 



<nnnnn> <statement> [ : <statement> . . . ] 



where nnnnn is the line number 



Name 



Format 



Version 



.CONSOLE 



.CONSOLE <!>,<J> 



Extended, Disk 



Allows terminal console device to be switched. I is the I/O 
port number which is the address of the low order channel of 
the new I/O board. J is the switch register setting (see 
section 5-1 for the list of settings). 0<=I,J<=255. 



DATA 



DATA«list> 



All 



Specifies data to 
can be numbers 



be read by a READ statement. List elements 
or, except in 4K, strings. 4K allows 
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expressions. List elements are separated by commas. 

DEF DEF FNV(<W>)=<X> 8K, Extended, Disk 

Defines a user-defined function. Function name is FN followed 
by a legal variable name. Extended and Disk versions allow 
user-defined string functions. Definitions are restricted to 
one line (72 characters in 4K and 8K, 255 characters in 
extended versions) . 

DEFUSR DEFUSR[<digit>]=<X> Extended, Disk 

Defines starting address of assembly language subroutine. Up 
to ten subroutines are allowed. 

DIM DIM <V>(<I>[,J.. .]) [,...] All 

Allocates space for array variables. In 4K, only one 
dimension is allowed per variable. More than one variable may 
be dimensioned by one DIM statement up to the limit of the 
line. The value of each expression gives the maximum 
subscript possible. The smallest subscript is 0. Without a 
DIM statement, an array is assumed to have maximum subscript 
of 10 for each dimension referenced. For example, A (I, J) is 
assumed to have 121 elements, from A(0,0) to A(10,10) unless 
otherwise dimensioned in a DIM statement. 

END END All 

Terminates execution of a program. .Closes all files in the 
Disk version. 

ERASE ERASE<V>[,<W>. ..] Extended, Disk 

Eliminates the arrays specified. The arrays may be 
redimensioned or the space made available for other uses. 

ERROR ERROR<I> Extended, Disk 

Forces error with code specified by the expression. Used 
primarily for user-defined error codes. 
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FOR FOR<V>=<X>TO<Y>[STEP<Z>] All 

Allows repeated execution of the same statements. First 
execution sets V=X. Execution proceeds normally until NEXT is 
encountered. Z is added to V, then, IF Z<0 and V>=Y, or if 
Z>0 and V<=Y, BASIC branches back to the statement after FOR. 
Otherwise, execution continues with the statement after NEXT. 

GOTO GOTO<nnnnn> All 

Unconditional branch to line number. 

GOSUB GOSUB<nnnnn> All 

Unconditional branch to subroutine beginning at line nnnnn. 

IF... GOTO IF <X> GOTO<nnnnn> 8K, Extended, Disk 

Same as IF... THEN except GOTO can only be followed by a line 
number and not another statement. 

.IF... THEN [ELSE] IF<X>THEN<Y> [ELSE<Z>] All 

or IF<X>THEN<statement> [ : statement. . .] 
[ELSE<statement> [ : statement. . . j 

If value of XO0, branches to line number or statement after 
THEN. Otherwise, branches to the line number or statement (s) 
after ELSE. If ELSE is omitted, and the value of X==0 , 
execution proceeds at the line after the '.IF. . .THEN. <In 4K, X 
can only be a numeric expression. The ELSE clause is only 
allowed in Extended and Disk Altair BASIC. 

INPUT INPUT<V> [ , <W> ... ] All 

Causes BASIC to request input from terminal. Values (or, in 
4K, expressions) typed on the terminal are assigned to the 
variables in the list. 

LET LET <V>=<X> All 

Assigns the value of the expression to the variable. The word 
LET is optional. 

LINE INPUT LINE JNPUTf- prompt str ingi ; ] <line feed> 

<string variable name> Extended, Disk 

LINE .INPUT prints the prompt string on the terminal and 
assigns all input from the end of the prompt string to the 
carriage return to the named string variable. No other prompt 
is printed if the prompt string is ojnitted . LINE INPUT may 
not be edited by Control/A. 
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LPRINT LPRINT X[,Y. ..] Extended, Bisk 

Same as PRINT, but prints on the line printer. Line feeds 
within strings are ignored. A carriage return is printed 
automatically after the 80th character on. a line. 

LPRINT USING LPRINT USING<str ing> ; <list> Extended, Disk 

Same as PRINT USING but prints on the line printer. For a 
detailed description, see section 5-5. 

MID$ MID$(<X$>,<I>[,<J>])=Y-$ Extended, Disk 

Part of the string X$ is replaced by ¥$. Replacement starts 
with the Ith character of X$ and proceeds until Y$ is 
exhausted, the end of X$ is reached or J characters have been 
replaced, whichever comes first. If I is greater than 
LEN(X-$), an ILLEGAL FUNCTION CALL error results. 

NEXT NEXT [ <V> ,<W> . . . ] All 

Last statement of a .FOR loop. V is the variable of the most 
recent loop, W of the next most recent and so on. Only one 
variable is allowed in 4K. Except in 4K, NEXT without a 
variable terminates the most recent FOR loop. 

ON ERROR GOTO ON ERROR GOTO<line number> Extended, Disk 

When an error occurs, branches to line specified. Sets 
variable ERR to error code and ERL to line number where the 
error occured. See section 6-5 for a "list of error codes. ON 
ERROR GOTO (or without number) disables error trapping. 

ON... GOTO ON<I>GOTO<list of line numbers> 8K, Ext., Disk 

Branches to line whose number is Ith in the list. List 
elements are separated by commas. .If il=0 or > number of 
elements in the list, execution continues at next statement. 
jlf ,I<0 or >255, an error results. 

ON...GOSUB ON <I> GOSUB <list> 8K, Extended, Disk 

Same as ON... GOTO except list elements are initial line 
numbers of subroutines. 

OUT OUT<I>,<J> 8K, Extended, Disk 

Sends byte J to port I. 0<=I,J<=255. 

POKE POKE<I>,<J> 8K, Extended, Disk 

Stores byte J in memory location derived from I. 
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0<=J<*255;-32768<I<65536. If I is negative, address is 
65536+1. If I is positive, address=I. 

PRINT PRINT<X> [ , <Y> . . . ] All 

Causes values of expressions in the list to be printed on the 
terminal. Spacing is determined by punctuation. 

Punctuation Spacing - next printing begins: 

, at beginning of next 14 column zone 

; immediately 

other or none at beginning of next line 

String literals may be printed if enclosed by quotation marks 
(") . String expressions may be printed in all but 4K. 

PRINT USING PRINT USING<str ing> ; <list> Extended, Disk 

Prints the values of the expressions in the list edited 
according to the string. The string is an expression which 
represents the line to be printed. The list contains the 
constants, variable names or expressions to be printed. List 
entries are separated by punctuation as in the PRINT 
statement. For a list of string characters and their 
functions, see section 5-5. 

READ READ<V>[,<W>. ..] All 

Assigns values in DATA statements to variables. Values are 
assigned in sequence starting with the first value in the 
first DATA statement. 

REM REM[<remark>] All 

Allows insertion of remarks. Not executed, but may be 
branched into. In Extended and Disk versions, remarks may be 
added to the end of a line preceded by a single quotation mark 
C). 

RESTORE RESTORE All 

Allows data from DATA statements to be reread. Next READ 
statement after RESTORE begins with first data of first data 
statement. 

RESUME RESUME [<number>] Extended, Disk 

Resumes program execution at the line specified after error 
trapping routine. If number is omitted or zero, resumes at 
statement where error occured. RESUME NEXT causes resumption 
at the statement following the statement where the error was 

made. 
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RETURN RETURN All 

Terminates a subroutine. Branches to the statement after the 
most recent GOSUB. 

STOP STOP All 

Stops program execution. BASIC enters command level and, 
except in 4K, prints BREAK IN LINE nnnnn. Unlike END, STOP 
does not close files. 

SWAP SWAP <V>,<W> Extended, Disk 

Exchanges values of the variables named. Variables must be of 
the same type. 

TROFF TROFF Extended, Disk 

Turns off trace flag. The trace flag is turned on by TRON 
(see below). NEW also turns off the trace flag. 

TRON TRON * Extended, Disk 

Turns on trace flag. Prints number of each line in square 
brackets as it is executed. 

WAIT WAIT<I>,<J>[,<K>] 8K, Extended, Disk 

Status of port I is XOR'd with K and AND'ed with J. Continued 
execution awaits non-zero result. K defaults to 0. 
0<=I,J,K<=255. 



6-3. Intrinsic Functions. 



Altair BASIC provides several commonly used algebraic and 
string functions which may be called from any program without 
further definition. If the functions are not required for a 
program, they may be deleted when BASIC is loaded to conserve 
memory space. The functions in the following table are listed 
in alphabetical order. The notation to the right of the Call 
Format is the version (s) in which the function is available. 
As usual, X and Y stand for expressions, ,1 and J for integer 
expressions and X$ and ¥$ for string expressions. 

Function Call Format Version 

ABS ABS(X) All 
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Returns absolute value of expression X. ABS(X)=X if X>=0, -X 
if X<0. 

ASC ASC(X$) 8K, Extended, Disk 

Returns the ASCII code of the first character of the string 
X?. ASCII codes are in appendix A. 

ATN ATN(X) 8K, Extended, Disk. 

Returns arctangent(X) . Result is in radians in range -pi/2 to 
pi/2. 

The following functions are available in Extended and Disk: 

CINT CINT{X) Converts X to integer. 

CSNG ,CSNG(X) ^Converts X to single precision. 

CDBL CDBL(X) Converts X to double precision. 

If the argument is in the range -32768 to 32767, the 
CINT (X) -INT (X) . Otherwise, CINT will produce an OVERFLOW 
error . 

.CHR$ vCHR$(I) , 8K, Extended, Disk 

Returns a string whose one element has ASCII code I. ASCII 
codes are in Appendix A. 

COS .COS(X) 8K, Extended, Disk ; 

Returns cos(X). X is in radians. 

ERL Extended, Disk 

Returns the number of the line in which the' last error 
occurred . 

ERR Extended, Disk 

Returns the error code of the last error. 

ERR ERR{I) Disk 

Returns parameters of disk errors. After a DISK I/O ERROR, 
ERR(0) returns number of the disk,, ERR(l) returns the track 
number (0-76) , ERR(2) returns the sector number, ERR(3) and 
ERR (4) return the low and high order 8 bits of the cumulative 
count of disk errors respectively. 

EXP EXP(X) 8K, Extended, Disk 

Returns e to the power X. X must be <=87.3365. 
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FIX FIX(X) Extended, Disk 

Returns the truncated integer part of X. FIX(X) is equivalent 
to SGN(X) *INT(ABS(X) ) . The major difference between FIX and 
INT is that FIX does not return the next lower number for 
negative X. 

FRE FRE(0) 8K, Extended, Disk 

Returns number of bytes in memory not being used by BASIC .If 
argument is a string, returns number of free bytes in string 
space. 

HEX$ HEX$(X) Extended, Disk 

Returns a string which represents the hexadecimal of the 
decimal argument. 

INP .INP{I) 8K, Extended, Disk 

Reads a byte from port I. 

INSTR INSTR([I,]X$,¥?)_ Extended, Disk 

Searches for the first occurrence of string ¥$ in X? and 
returns the position. Optional offset I sets position for 
starting the search. 0<=*I<=255. ,lf I>LEN(X$) , if X$ is null 
or if Y$ cannot be found, INSTR returns 0. .If ¥$ is null, 
.INSTR returns I or 1. Strings may be string variable values, 
string expressions or string literals. 

INT INT(X) All 

Returns the largest integer <=X 

LEFT? LEFTS (X-?,.. I) 8K, Extended, Disk 

Returns leftmost I characters of string X$. 

LEN . L£N(X-$) 8K, Extended, Disk 

Returns length of string x$. Non-printing characters and 
blanks are counted. 

LOG LOG{X) 8K, Extended, Disk 

Returns natural log of X. X>0 

LPOS LPOS(X) Extended, Disk 

Returns the current position of the line printer print head 
within the line printer buffer. Does not necessarily give the 
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physical position of the print head. The expression X must be 
given, but the value is ignored. 

MID$ MID$ (X?,I[,J] ) 8K, Extended, Disk 

Without J, returns rightmost characters from x$ beginning with 
the Ith character. * If I>LEN(X$), MID? returns the null 
string. 0<I<255. With 3 arguments, returns a string of 
length J of characters from X? beginning with the Ith 
character. If J is greater than the number of characters in 
X$ to the right of I, MID? returns the rest of the string. 
0<=J<=255. 

QCT$ OCT?(X) 8K, Extended, Disk 

Returns a string which represents the octal value of the 
decimal argument. 

RND RND(X) All 

Returns a random number between and 1. X<0 starts a new 
sequence of random numbers. X>0 gives the next random number 
in the sequence. X=0 gives the last number returned. In 8K, 
Extended and Disk, sequences started with the same negative 
number will be the same. 

POS POS(I) 8K, Extended, Disk 

Returns present column position of terminal's print head. 
Leftmost position =0. 

RIGHT? RIGHT? (X$, I) 8K, Extended, Disk 

Returns rightmost .1 characters of string X$. If I=LEN(X$), 
returns X?. 

SGN SGN(X) All 

If X>0, returns 1, if X=0 returns 0, if X<0, returns -1. For 
example, ON SGN(X)+2 GOTO 100,200,300 branches to 100 if X is 
negative, 200 if X is and 300 if X is positive. 

SIN SIN(X) All 

Returns the sine of the value of X in radians. 
COS (X)=SIN(X+3. 14159/2) . 

SPACE? SPACE? (I) Extended, Disk 

Returns a string of spaces of length I. 
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SPC SPC(I) 8K, Extended, Disk 

Prints I blanks on terminal. 0<=I<=255. 

SQR SQR(X) All 

Returns square root of X. X must be >=0 

STR$ STR$(X) 8K, Extended, Disk 

Returns string representation of value of X. 

STRINGS STRINGS (I, J) Extended, Disk 

Returns a string of length ,1 whose characters all have ASCII 
code J. _ See Appendix A for ASCII codes. 

TAB TAB(.I) All 

Spaces to position I on the terminal. Space is the leftmost 
space, 71 the rightmost. If the carriage is already beyond 
space I, TAB has no effect. 0<=I<=255. May only be used in 
PRINT and LPRINT statements. 

TAN TAN(X) All 

Returns tangent(X). X is in radians. 

USR USR(X) All 

Calls the user's machine language subroutine with argument X. 

VAL VAL(X$) 3K, Extended, Disk 

Returns numerical value of string X$ . If first character of 
X$ is not + , -, or a digit, VAL(X$)=0. 

VARPTR VARPTR(V) Extended, Disk 



Returns the address of the variable given as the argument. -If 
the variable has not been assigned a value during the 
execution of the program, an ILLEGAL FUNCTION CALL error will 
occur. The main use of the VARPTR function is to obtain the 
address of variable or array so it may be passed to an 
assembly language subroutine. Arrays are usually passed by 
specifying VARPTR(A[0]) so that the lowest addressed element 
of the array is returned. 
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NOTE 

All simple variables should be assigned values in a 
program before calling VARPTR for any array. 
Otherwise, allocation of a new simple variable will 
cause the addresses of all arrays to change. 



6-4 . Special Characters 



Altair BASIC recognizes several characters in the ASCII 
font as having special functions in carriage control, editing 
and program interruption. Characters such as Control/C, 
Control/S, etc. are typed by holding down the vControl key and 
typing the designated letter. The special characters in the 
table are listed in the order of the versions to which they 
apply, starting with those common to all versions and ending 
with those that apply only to extended versions. 

Typed as : Printe d asj_ 

The following Special Characters are available in ALL 
versions. 

@ @ 

Erases current line and executes carriage return. 



Erases last character typed. If there is no last character 
types a carriage return. 

_ ^{underline) 

same as backarrow. 

Carriage Return 

Returns print head or curser to beginning of the next line. 

Control/C /\C (in Extended and Disk) 

Interrupts execution of current program or list command. 
Takes effect after execution of the current statement or after 
listing the current line. BASIC goes to command level and 
types OK. CONT command resumes execution. See section 6-1. 

* • 

Separates statements in a line. 
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The following special characters are available in 8K, Extended 
and Disk versions only. 

Control/0 /\0 (in Extended and Disk) 

Suppresses all output until an .INPUT statement is encountered, 
another Control/0 is typed, an error occurs or BASIC returns 
to command level. 



Equivalent to PRINT statement. 

Rubout see explanation 

Deletes previous character on an input line. First Rubout 
prints \ and the last character to be printed. Each 
successive Rubout prints the next character to the left. 
Typing a new character causes another \ and the new character 
to be printed. All characters between the backslashes are 
deleted . 

Control/0 /\u (in extended) 

Same as @ . 

Control/S 

Causes program execution to pause until ,Control/Q or Control/C 
is typed. 

Control/Q 

Causes execution to resume after Control/S. Control/S and 
Control/Q have no effect if no program is being executed. 

The following special characters are available in Extended and 
Disk versions only. 

Control/A 

Allows use of the EDIT command on the line currently being 
typed. Control/A is typed instead of Carriage Return. See 
section 5-4. 

Control/I 1 to 8 spaces 

Tab character. Causes print head or curser to move to the 
beginning of the next 3 column field. Fields begin at columns 
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1, 9, 17, etc. The tab character is especially useful for 
formatting lines broken with line feeds. 

100<tab>FOR 1=1 TO 10:<line feed> 
<tab><tab>FOR J=l TO 10:<line feed> 
<tab><tab><tab>A(I,J)=0:<line feed> 
<tab>NEXT J,Kcarriage return> 

lists as: 

100 FOR ,1=1 TO 10: 

FOR J=l TO 10: 

A(I,J)=0: 
NEXT J, I 

Control/G bell 

Rings terminal's bell. 

LINE FEED 

Breaks a long -line into shorter parts. The result is still 
one BASIC line. 



Denotes the number of the current line. May be used wherever 
a line number is to be specified. 

[,J M 

Brackets are interchangeable with parentheses as delimiters 
for array subscripts. 

Lower .Case Input 

Lower case alphabetic characters are always echoed as lower 
case, but LIST, LLIST, PRINT and LPRINT will translate lower 
case to upper case if the lower case characters are not part 
of string literals, REM statements or remarks delineated by 
single quotation marks ( ' ) . 



6-5. Error Messages 



After an error occurs, BASIC returns to command -level and 
types OK. Variable values and the program text remain intact, 
out the program cannot be continued" by the CONT command. In 
4K and 8K versions, all GOSUB and FOR context is lost. The 
program may be continued by direct mode GOTO, however. When 
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an error occurs in a direct statement, no line number is 
printed. Format of error messages: 

Direct Statement ?XX ERROR 
.Indirect Statement ?XX ERROR IN YYYYY 

where XX is the error code and YYYYY is the line number where 
the error occurred. The following are the possiole error 
codes and their meanings: 

ERROR CODE EXTENDED ERROR MESSAGE NUMBER 

The following error codes apply in ALL versions. . 

BS SUBSCRIPT OUT OF RANGE 9 

An attempt was made to reference an array element which is 
outside the dimensions of the array. In the 8K and (larger 
versions, this error can occur if the wrong number of 
dimensions are used in an array reference. For example: 

LET A(l,l,l)=z 

when A has already been dimensioned by DIM A(10,10) 

DD REDIMENSIONED ARRAY 10 

After an array was dimensioned, another dimension statement 
for the same array was encountered. This error often occurs 
if an array has been given the default dimension of 10 and 
later in the program a DIM statement is found for the same 
array. 

FC ILLEGAL FUNCTION CALL 5 

The parameter passed to a math or string function was out of 
range. FC errors can occur due to: 

1. a negative array subscript (LET 'A(-l) =0) 

2.. an unreasonably large array subscript (>32?6?) 

3. LOG with negative or zero argument 

4. SQR with negative argument 

5. A«B with A negative and B not an integer 
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6. a call to USR before the address of a machine language 
subroutine has been entered. 

7. calls to MID$, LEFTS, RIGHT? , INP, OUT, WAIT, PEEK, POKE, 
TAB, SEC, STRINGS, SPACE?, INSTR or ON... GOTO with an 
improper argument. 

ID ILLEGAL DIRECT 12 

.INPUT and DEF are illegal in the direct mode. In extended 
versions, however, INPUT is legal in direct. 

NF NEXT WITHOUT FOR 1 

The variable in a NEXT statement corresponds to no previously 
executed FOR statement. 

OD OUT OF DATA, 4 

A READ statement was executed but all of the DATA statements 
in the program have already been read. The program tried to 
read too much data or insufficient data was included in the 
program. 

OM OUT OF MEMORY ? 

Program is too large, has too many variables, too many FOR 
loops, to many GOSUBs or too complicated expressions. See 
Appendix C. 

OV OVERFLOW 6 

The result of a calculation was too large to be represented in 
Altair BASIC'S number format. If an underflow occurs, zero is 
given as the result and execution continues without any error 
message being printed. 

SN SYNTAX ERROR 3 

Missing parenthesis in an expression, illegal character in a 
line, incorrect punctuation, etc. 

RG RETURN WITHOUT GOSUB 3 

A RETURN statement was encountered before a previous GOSUB 
statement was executed. 

UL UNDEFINED LINE 8 

The line reference in a GOTO, GOSUB, IF .. .THEN. . .ELSE or 
DELETE was to a line which does not exist. 
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/0 DIVISION BY ZERO 11 

Can occur with integer division and MOD as well as floating 
point division. to a negative power also causes a DIVISION 
BY ZERO error. 



The following error messages apply to 
8K, Extended and Disk versions only 

CN CAN'T CONTINE 1? 

Attempt to continue a program when none exists, an error 
occurred or after a modification was made to the program. 

LS STRING TOO LONG 15 

An attempt was made to create- a string more than 255 
characters long. 

OS OUT OF STRING SPACE 14 

String variables exceed amount of string space allocated for 
them. Use the .CLEAR command to allocate more string space or 
use smaller strings or fewer string variables. 

ST STRING FORMULA TOO .COMPLEX 16 

A string expression was too long or too complex. Break it 
into two or more shorter ones. 

TM TYPE MISMATCH 13 

The left hand side of an assignment statement was a numeric 
variable and the right hand side was a string, or vice-versa; 
or a function which expected a string argument was given a 
numeric one or vice-versa. 

UF UNDEFINED USER FUNCTION 18 

Reference was made to a user defined function which had never 
been defined. 



The following error messages are available in Extended and 
Disk versions only. 

MISSING OPERAND 20 

During evaluation of an expression, an operator was found with 
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no operand following it 



NO RESUME 19 



BASIC entered an error trapping routine, but the program ended 
before a RESUME statement was encountered. 

RESUME WITHOUT ERROR 21 

A RESUME statement was encountered, but no error trapping 
routine had been entered. 

UNPRINTABLE ERROR 22 

An error condition exists for which there is no error message 
available. Probably there is an ERROR statement with an 
undefined error, code. 

LINE BUFFER OVERFLOW 23 

An attempt was made to input a program or data line which has 
too many characters to be held in the line buffer. Shorten 
the line or divide it into two or more parts. 



Disk Altair BASIC Error Messages 



FIELD OVERFLOW 50 

An attempt was made to allocate more than 128 characters of 
string variables in a single FIELD statement. 

INTERNAL ERROR 51 

.Internal error in Disk BASIC. Report conditions under which 
error occurred and all relevant data to MITS software 
department. This error can also be caused by certain kinds of 
disk : I/0 errors. 

BAD FILE 52 

An attempt was made to use a file number which specifies a 
file that is not OPEN or that is greater than the number of 
files entered during the Disk Altair BASIC initialization 
dialog. 

FILE NOT FOUND 53 
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FILE NOT FOUND 53 

Reference was made in a LOAD, KILL or OPEN statement to a file 
which did not exist on the disk specified. 

BAD FILE MODE 54 

An attempt was made to peoform a PRINT to a random file, to 
OPEN a random file for sequential output, to perform a PUT or 
GET on a sequential file, to load a random 'file or to execute 
an OPEN statement where the file mode is not I, 0, or R. 

FILE ALREADY OPEN 55 

A sequential output mode OPEN for a file was issued for a file 
that was already OPEN and had never been CLOSEd or a KILL 
statement was given for an OPEN file. 

DISK NOT MOUNTED 56 

An I/O operation was issued for a file that was not MOUNTed . 

DISK I/O ERROR 5? 

An I/O error occured on disk X. A sector read (checksum) 
error occurred eighteen (18) consecutive times. 

SET TO NON-DISK STRING 58 

An LSET or RSET was given for a string variable which had not 
previously been mentioned in a FIELD statement. 

DISK ALREADY MOUNTED 59 

A MOUNT was issued for a DISK that was already MOUNTed but 
never UNLOADed. 

DISK FULL 60 

All disk storage is exhausted on the disk. Delete some old 
disk files and try again. 

INPUT PAST END 61 

An INPUT statement was executed after all the data in a file 
had been INPUT. This will happen immediately if an INPUT is 
executed for a null (empty) file. Use of the EOF function to 
detect End Of File will avoid this error. 
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BAD RECORD NUMBER 62 

In a PUT or GET statement, the record number is either greater 
than the allowable maximum (2046) or equal to zero. 

BAD FILE NAME 63 

A file name of characters (null) or a file name whose first 
byte was or 377 octal (255 decimal) or a file name with more 
than 8 characters was used as an argument to LOAD, SAVE, KILL 
or OPEN. 

MODE-MISMATCH 64 

Sequential OPEN for output was executed for a file that 
already existed on the disk as a random (R) mode file, or vice 
versa. 

DIRECT STATEMENT IN FILE 65 

A direct statement was encountered during a LOAD of a program 
in ASCII format. The LOAD is terminated. 

TOO MANY FILES 66 

A SAVE or OPEN (0 or R) was executed which would create a new 
file on the disk, but all 255 directory entries were already 
full. Delete some files and try again. 

OUT OF RANDOM BLOCKS 67 

An attempt was made to have more random files OPEN at once 

than the number of random blocks that were allocated during 

initialization by the response to the 
"NUMBER OF RANDOM FILES?" question (see Appendix H) . 

FILE ALREADY EXISTS 68 

The new file name specified in a NAME statement had the same 
name as another file that already existed on the disk. Try a 
different name. 

FILE LINK ERROR 69 

During the reading of a file, a sector was read which did not 
belong to the tile. 
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6-6. Reserved Words, 



Some words are reserved by the Altair 
use as statements, commands, operators, 
be used for variable or function names, 
are listed below in order of the vers 
reserved, starting with those reserved 
ending with those reserved only in Di 
reserved in larger versions may be .used 
although one may want to avoid al 
interest of compatibility. In addition 
below, intrinsic function names are 
versions in which they are available. 



BASIC interpreter for 

etc. and thus may not 

The reserved words 

ions for which they are 

in all versions and 
sk Altair BASIC. Words 

in smaller versions, 
1 reserved words in the 

to the words listed 
reserved words in all 



RESERVED WORDS 



Words reserved in all versions 



CLEAR 

DATA 

DIM 

END 

FOR 

GOSDB 

GOTO 

IF 

INPUT 

LET 

LIST 



NEW 
NEXT 
PRINT 
READ 
REM 

RETURN- 
RUN 
STOP 
TO 
TAB 
THEN 
USR 



words reserved in 8K, Extended and Disk versions, 
plus: 



All the above 



AND 

vCONT 

DEF 

FN 

NOT 

NULL 



ON 

OR 

OUT 

POKE 

SFC 

WAIT 



Words reserved in Extended and Disk versions. All the above olus 



AUTO 


LINE 


CONSOLE 


LLIST 


DEFDBL 


LPRINT 


DEE INT 


MOD 


DEFSNG 


RENUM 


DEFSTR 


RESUME 


DELETE 


SPACE$ 


EDIT 


STRING? 


ELSE 


SWAP 
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ERASE 


1R.-0N 


ERL 


VARPTR 


ERR 


WIDTH 


IMP 


XOR 


INSTR 





Words reserved in Disk. All the above plus: 

.CLOSE LSET 

DSKI5 MERGE 

DSKO$ MOUNT 

FIELD NAME 

FILES OPEN 

GET PUT 

KILL RSET 

LOAD UNLOAD 
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APPENDIX A 
ASCII CHARACTER CODES 



DECIMAL 


CHAR. 




DECIMAL 


CHAR. 


DECIMAL 


CHAR. ..- 


000 


NUL 




043 


+ 


086 


V 


001 


SOH 




044 


r 


087 


W 


002 


STX 




045 


- 


088 


X 


003 


ETX 




046 


• 


089 


y 


004 


EOT 




047 


/ 


090 


z 


005 


ENQ 




043 





091 


[ 


006 


ACK 




049 


1 


092 


V 


007 


BEL 




050 


2 


093 


] 


008 


BS 




051 


3 


094 


" (or 


009 


HT 




052 


4 


095 


< (or- 


010 


LF 




053 


5 


096 


■ 


011 


VT 




054 


6 


097 


a 


012 


FF 




055 


7 


098 


b 


013 


CR 




056 


8 


099 


c 


014 


SO 




057 


9 


100 


d 


015 


SI 




058 


j 


101 


e 


916 


DLE 




059 


> 


102 


f 


017 


DC1 


<h 


060 


< ietk. 


103 


g 


018 


DC 2 


-9s 


061 


= 0<U4,V 


124 


h 


019 


DC 3 


% 


062 


J 


125 


i 


020 


DC 4 


*>■ 


063 


? 


106 


j 


021 


NAK 


lOo 


064 


i 


127 


k 


022 


SYN 




065 


A 


108 


1 


023 


ET3 




066 


B 


109 


m 


024 


CAN 




067 


C 


110 


n 


025 


EM 




068 


D 


111 


o 


026 


SUB 




069 


E 


112 


p 


027 


ESCAPE 




070 


F 


113 


a 


028 


FS 




071 


G 


114 


r 


029 


GS 




072 


H 


115 


s 


030 


RS 




073 


I 


116 


t 


031 


US 




074 


J 


117 


u 


032 


SPACE 




075 


K 


118 


V 


033 


i 




076 


L 


119 


w 


034 


ii 




077 


M 


120 


X 


035 


# 




078 


N 


121 


Y 


036 


$ 




079 





122 


2 


037 


% 




080 


P 


123 


{ 


038 


Si 




081 


Q 


124. 


1 


039 


i 




082 


R 


125 




040 


( 




083 


S 


126 




041 


) 




084 


T 


127 


DEL 


042 


* 




085 


U 






LF=Line 


Feed FE 


'=Form Feed 


CR=Carriage 


Return DEL=Rubout 



t) 
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Using ASCII codes — the CHR$ function. 

CHR$ (X) returns a string whose one character is that with 
ASCII code X. ASC(X$) converts the , first character of a 
string to its ASCII decimal value. 

One of the most common uses of CHR$ is to send a special 
character to the user's . terminal. The most often used of 
these characters is the BEL (ASCII 7) . Printing this 
character will cause a bell to ring on some terminals and a 
beep on many CRT's. This may be used as a preface to an error 
message, as a novelty, or just to wake up the user if he has 
fallen asleep. Example: 

PRINT CHR$ (7) ; 

Another major use of CHR$ is on those CRT's that have 
cursor positioning and other special functions (such as 
turning on a hard copy orinter) . For example, on most CRT's a 
form feed (CHR$(12)) will cause the screen to erase and the 
cursor to "home" or move to the upper left corner. 

Some CRT's give the user the capability of drawing graphs 
and curves in a special point-plotter mode. This feature may 
easily be taken advantage of through use of Altair BASIC'S 
CHR$ function. 
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APPENDIX 8 
LOADING AND INITIALIZING BASIC 



A. Loading BASIC from paper tape or cassette. 

This appendix details the procedure for loading 3ASIC in 
4K, 8K and Extended versions from paper tape or tape cassette. 
For instructions on loading Disk BASIC, see appendix H. 

The programs below are entered into memory through the 
front panel switches. Rather than specify the switch 
positions as "up" and "down" > it is convenient to denote the 
up position as 1 and the down position as 0. Taken in groups 
of three the switches can represent octal digits. To save 
space, the switch positions in the following .loader program 
listings are shown in octal notation. The leftmost two 
switches in an 8 bit set are represented by the first digit, 
the next three by the second digit and the low-order three 
switches by the last digit. 

For example, if we wish to enter octal 315 on the data 
switch register, the switches would have the following 
positions : 



7 


6 


5 


4 


3 


2 


1 





up 


UP 


down 


down 


UP 


up 


down 


up 


3 






1 






5 





For data entry, only the rightmost 8 switches of the 16 
switches on the ALTAIR 8800 front panel switch register are 
used. All 16 switches would be used to enter a memory 
address. 

The following is the procedure for loading BASIC from 
paper tape or cassette: 

1. Turn the power switch on 

2. Raise the STOP switch and RESET switch simultaneously 

3. Switch the terminal to LINE 

4. Enter one of the following programs on the front panel 
switches. The 88-MBL Multi-Boot Loader PROM contains the 
necessary loader programs, so it is not necessary to enter 
a loader from the front panel if it is installed. Refer 
to the 88-MBL manual for more information. 
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a. loading from paper tape with the SIO board ( REV 1) 

Octal Address Octal Data 

000 041 

001 302 

002 0xx (17 for 4K, 37 for 8K, 77 for 

003 061 Extended & Disk) 

004 022 

005 000 

006 333 

007 000 

010 017 

011 330 

012 333 

013 001 

014 275 

015 310 

016 055 

017 167 

020 300 

021 351 

022 003 

023 000 



b. loading from cassette 

Octal Address Octal Data 

000 041 

001 302 

002 0xx (17 for 4K, 37 for 8K, 77 for 

003 061 Extended and Disk) 

004 022 

005 000 

006 333 

007 006 

010 017 

011 330 

012 333 

013 007 

014 275 

015 310 

016 055 

017 167 

020 300 

021 351 

022 003 

023 000 
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c. loading with the 38 PIO board 



Octal 

000 

001 

002 

003 

004 

005 

006 

007 

010 

011 

012 

013 

014 

015 

016 

017 

020 

021 

022 

023 

024 



Address 



Octal Data 

041 

302 

0xx 

061 

023 

000 

333 

004 

346 

001 

310 

333 

005 

275 

310 

055 

167 

300 

351 

003 

000 



(17 for 4K, 37 for 8K, 77 for 
Extended and Disk) 



d. loading with the 2SI0 board 
Octal Address Octal Data 



000 
001 
002 
003 
004 
005 
006 
007 
010 
011 
012 
013 
014 
015 
016 
017 
020 
21 
022 
023 
024 
025 
026 



076 
003 
323 
020 
076 
021 
323 
020 
041 
302 
0xx 
061 
032 
000 
333 
020 
017 
320 
333 
021 
275 
310 
055 



(=2 stop bits, 025=1 stop bit) 



(17for 4K, 37 for 8K, 77 for 
Extended and Disk) 
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027 167 

030 300 

031 351 

032 013 

033 000 



e. loading with the 4PIO board 



f. 



Octal 


Add 


cess 


Octal Data 


000 






. 257 


001 






323 


002 






040 


003 






323 


004 






041 


005 






076 


006 






054 


007 






323 


010 






040 


011 


. 




041 


012 






302 


013 






0xx (17 for 4K, 37 f 


014 






061 Extended and Di 


015 






033 


016 






000 


017 






333 


020 






040 


021 






007 


022 






330 


023 






333 


024 






041 


025 






275 


026 






310 


027 






055 


030 






167 


031 






300 


032 






351 


033 






014 


034 


• 




000 


Loadii 


ig with the 


High Speed Tape Reader 


Octal 


Add 


ress 


Octal Data 


000 






257 


001 






323 


002 






044 


003 






323 


004 






045 


005 






323 


006 






046 


007 






057 


010 






323 



for 8K, 77 for 
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011 047 

012 076 

013 014 

014 323 

015 044 

016 076 

017 004 

020 323 

021 046 

022 323 

023 047 

024 041 

025 302 

026 0xx (17 for 4K, 37 for 8K, 77 for 

027 061 Extended and Disk) 

030 047 

031 " 000 

032 333 

033 044 

034 346 

035 100 

036 310 

037 333 

040 045 

041 275 

042 310 

043 055 

044 167 

045 300 

046 351 

047 027 
050 000 

To enter these programs: 

1. Put switches to 15 in the down positions 

2. Raise EXAMINE 

3. Put the data for address zero in switches through 7 

4. Raise DEPOSIT 

5. Put the data for the next address in the switches 

6. Depress DEPOSIT NEXT 

7. Repeat steps 5 and 6 until the whole loader is toggled in 
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8. Put switches through 15 in the down position 

9. Raise EXAMINE 

10. Check to see that the lights D0 through D7 show the data 
that should be in location 000. Light on =1, light off = 
0. If the correct value is there, go to step 13; if not, 
go to 11. 

11. Put the correct value in the switches 

12. Raise DEPOSIT 

13. Depress EXAMINE NEXT 

14. Repeat steps 10 through 13 to check the entire loader 

15. If there were any mistakes, check the" entire loader again 
to make sure they were corrected. 

16. If a paper tape is being loaded, put it into the reader 
and make sure that it is positioned at the beginning of 
the leader. The leader is the section of tape at the 
beginning with 302 octal punched in each column. If an 
audio cassette is being loaded, put it in the cassette 
recorder and make sure it is fully rewound. 

17. Lower switches through 15 

18. Raise EXAMINE 

19. Enter the sense switch settings. See the table in 
section 3. 

20. If loading is through a SIOA, B or C or an 88PIO, turn on 
the tape reader and then depress RUN. If a cassette is 
being loaded, turn on the recorder, put it in PLAY mode 
and wait 15 seconds. Then press RUN on the computer. If 
loading is through a 4PI0, 2SIO or High Speed Tape Reader, 
depress RUN and then start the read device. 

21. Wait for the tape to read. Paper tape takes about 25 
minutes for Extended, 12 minutes for 8K and 6 minutes for 
4K. Cassettes take about 8 minutes for Extended, 4 
minutes for 8K and 2 minutes for 4K. Do not move any of 
the switches while the tape is being read. 

22. If a loading error occurs, the loading procedure must 
start over from step 1. See section C below for error 
conditions. 



2_QQ SASIC 4.1 

April, 1977 



23. When the tape is read, BASIC should start uo and print 
MEMORY SIZE? See section D below for what to" do next! 

24. If BASIC will not load from cassette, the ACR module may 
need realignment. The Input Test Program described in the 
ACR Manual, pages 22 and 28, may be used to test the ACR. 



B. Sense Switch Settings 

Sense switches (switches A8 through A15) must be set 
before tape or cassette loading begins. The settings depend 
on the terminal and input interface boards in use. The low 
order (rightmost) four switches contain the load board 
setting, and the high order four switches contain the terminal 
board setting. In the table below, the setting is given for 
each I/O board option. As above, the setting 'is an octal 
number which signifies the switch positions. The Terminal 
Switch and Load Switch columns show the switches that are 
raised for each of the load and terminal device options. 





Sense Switch 


Terminal 


Load 






Device 




Setting 


Switches 


Switches 


Channels 


2SI0 







none 


none 


20, 


21 


(2 stop 


bits) 










2SI0 




1 


A12 


A8 


20, 


21 


(1 stop 


bi 


t) 










SIO 




2 


A13 


A9 


0, 


1 


ACR 




3 


A13,A12 


A9,A8 


6, 


7 


4PIO 




4 


A14 


A10 


40, 41, 


42, 43 


PIO 




5 


A14,A12 


A10,A8 


4, 


5 


HSR 




6 


A14,A13 


A10,A9 


46, 


47 


non-standard 


14 










terminal 














no terminal 


15 










Examples: 















Input from audio cassette through ACR and CRT terminal 

through 2SI0 with 1 stop bit. 

Switch 15 14 13 12 11 10 9 8 

Position 00010011 

Input from high speed paper tape reader, terminal 
through SIO. 

Switch 15 14 13 12 11 10 9 8 
Position 00100110 
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C. Error Detection 

The checksum loader turns on the Interrupt Enable light 
on the front panel when a loading error occurs. The ASCII 
code of the error letter is stored in location 0. v In 
addition, the error letter is sent out over all the terminal 
channels and appears on whatever terminal is connected to the 
terminal. The error letters are as follows: 

C checksum error. Bad tape data. 

M memory error. Data won't store properly. 

The address of the bad memory location is stored 

in locations 1 and 2. 

overlay error. Attempt was made to load data on top 

of the loader. 

1 invalid load device. Invalid setting on the 

sense switches. 



D. Initialization Dialog 

Upon starting, BASIC prints 

MEMORY SIZE? 

To this, the user responds by typing the number of bytes of 
memory to be used bv BASIC and BASIC programs. Remember that 
the BASIC interpreter itself takes 3.4K in the 4K version, 
6.2K in 8K and 14. 6K in Extended. If the response is just a 
carriage return, BASIC will use all the memory it can find, 
starting at location zero up to the last byte of read/write 
memory. Then BASIC asks, 

TERMINAL WIDTH? 

to which the user responds with the width of the printing line 
of whatever output device is in use. Typing a carriage return 
sets the terminal width to 72. Extended and Disk Altair BASIC 
set the terminal width through the WIDTH command, so the 
TERMINAL WIDTH guestion is not asked at initialization and an 
initial width of 72 is assumed. 

In 4K, the response to MEMORY SIZE? and TERMINAL WIDTH? 
must be less than 6 digits. 

The Extended and Disk versions now ask what kind of line 
printer is in use. 

LINEPRINTER? 

The user answers with if the 80LP printer is in use, C for 
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the C700 and Q for the Q70. One of these letters must be 
typed whether or not a lineprinter is connected to the system. 

At this point .3ASIC asks several Questions about 
mathematical functions. The functions may be kept if needed 
or deleted to save space. 4K asks, 



SIN? 

SQR? 

RND? 



Answer Y to save SIN, SQR and RND 
Answer N to delete SIN and see the 
next question 

Y keeps SQR and RND 

N deletes SQR, asks next question 

Y keeps RND 

N deletes RND 



8K and Extended BASIC ask, 

WANT SIN-COS-TAN-ATN? Y keeps all four 

N deletes all four 
A deletes only ATN 
C (in extended) retains 
CONSOLE and all other 
functions. Other an- 
swers delete CONSOLE. 

Now BASIC prints, 

XXXX BYTES FREE 

ALTAIR BASIC VERSION 4.0 
[FOUR-K VERSION] 

or 
[EIGHT-K VERSION] 

or 
[EXTENDED VERSION] 
COPYRIGHT 1977 BY MITS, INC. 
OK 

BASIC is now in command level and is ready for use. 
E. Echo Routines. 



The Altair input/output 
mode. This means that char 
terminal will not, as a rule, 
unless the computer is pr 
following echo programs may'b 
devices. To test an inpu 
characters on an output devic 
later examination. To tes 
echo characters through the f 
constant character. Be sure 



channels work 
acters entered 
be printed as 
og rammed to 
e used to test 
t-only device 
e or store th 
t an output-on 
ront panel ^.sw 
to check the r 



in a 
on an 
they 
return 

the 
, dump 
em in 
ly devi 
itches 
eady-to 



full-duplex- 
input/output 
are entered 

them. The 

input/output 

the echoed 

memory for 
ce, send the 

or send a 
-receive bit 
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of the output terminal before attempting output. If the echo 
program works, but BASIC does not, make sure the load device's 
I/O board is strapped for 8 data bits and that^ the 
ready-to-recieve bit" is set properly on the terminal device. 



88-PIO 




OCTAL ADDRESS 


OCTAL DATA 


001 


004 


002 


346 


003 


001 


004 


312 


005 


000 


006 


000 


007 


333 


010 


005 


011 


323 


012 


005 


013 


303 


014 


000 


015 


000 


2SI0 




OCTAL ADDRESS 


OCTAL DATA 


000 


076 


001 


003 


002 


323 


003 


020 (flag ch.) 


004 


076 


005 


021 (=2 stop bits, 


006 


323 025=1 stop bit) 


007 


020 


010 


333 


011 


020 


012 


017 


013 


322 


014 


010 


015 


000 


015 


333 


017 


021 (data channel) 


020 


323 


021 


021 


022 


303 


023 


010 


024 


000. 


4PI0 




OCTAL ADDRESS 


OCTAL DATA 


000 


257 


001 


323 


002 


040 


003 


323 


004 


041 
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005 323 

006 042 

007 057 

010 323 

011 043 

012 076 

013 054 

014 323 

015 040 

016 323 

017 042 

020 333 

021 040 

022 346 

023 200 

024 312 

025 020 

026 000 

027 333 

030 042 

031 346 

032 . 200 

033 312 

034 027 

035 000 

036 333 

037 041 

040 323 

041 043 

042 303 

043 020 

044 000 
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APPENDIX C 
SPACE AND SPEED HINTS 



A. Space Allocation 

The memory space required for a program depends, of 
course, on the number and kind of elements in the program. 
The following table contains information on the space required 
for the various program elements. 



Element 

Variables 
numeric 



Space Required 



integer 5 bytes 

single precision 7 bytes in Extended and Disk 

6 bytes in 4K and 8K 
double precision 11 bytes 
string 8 bytes 



Arrays 
integer 



f2l 


+ 


[6] 


4 






8 






3 






.6. 


+ 


.5. 



+(# of dimensions) *2 bytes 



(# of elements)* 
single precision 
double precision 
string 
8K and 4K 
strings and floating pt. 

Functions 

intrinsic 1 byte for the call (2 bytes in Extended and Disk) 
user-defined 5 bytes for the definition 

Reserved Words 1 byte each 

2 bytes for ELSE in Extended and Disk 

Other Characters 

1 byte each 



Stack Space 
active FOR 

loop 17 bytes in Extended and Disk, 
16 bytes in 4K and 3K 
active GOSUB 5 bytes 
parentheses 6 bytes each set 
temporary 

result 12 bytes in Extended and Disk 
10 bytes in 4K and 8K 
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BASIC itself takes about 3.4K in the 4K version, 6.2K in 
8K, 14. 6K in Extended and 20 K in Disk. 

B. Space Hints 

The space required to run a program may be significantly 
reduced without affecting execution by following a few of' the 
following hints: 

1. Use multiple statements per line. Each line has a 5 byte 
overhead for the line number, etc., so the fewer lines 
there are, the less storage is required. 

2. Delete unnecessary spaces. Instead of writing 

10 PRINT X, Y, Z 
use 

10 PRINTX,Y,Z 

3. Delete REM statements to save 1 byte for REM and 1 byte 
for each character of the remark. 

4. Use variables instead of constants, expecially when the 
same value is used several times. For example, using the 
constant 3.14159 ten times in a program uses 40 bytes more 
space than assigning 

10 P=3. 14153 
once and using P ten times. 

5. Using END as the last statement of a program is not 
necessary and takes one extra byte. 

6. Reuse unneeded variables instead of defining new 
variables. 

7. Use subroutines instead of writing the same code several 
times. 

8. Use the smallest version of BASIC that will run the 
program. 

.9. Use the zero elements of arrays. Remember the array 
dimensioned by 

100 DIM A (10) 

has eleven elements, A(0) through A(10). 
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10. In Extended and 
possible. 



Disk, use integer variables wherever 



C, 
1. 



5, 
6, 

7, 
8, 



Speed Hints 



Deleting spaces and REM statements gives a 
significant decrease in execution time. 



small but 



Variables are set up in a table in the order of their 
first appearance in the program. Later in the program, 
BASIC searches the table for the variable at each 
reference. Variables at the head of the table take less 
time to search for than those at the end. Therefore, 
reuse variable names and keep the list of variables as 
short as possible. 

In 8K, Extended and Disk use NEXT without the index 
variable. 

8K, Extended and Disk have faster floating point 
arithmetic than 4K. If space is not a limitation, use the 
larger versions. 

The math functions in 8K, Extended and Disk are faster 
than those in 4K. 

In the 4K and 8K versions, use variables instead of 
constants, especially in FOR loops and other code that 
must be executed repeatedly. 



In Extended 
oossible. 



and Disk, use integer variables wherever 



String variables set up a descriptor which contains the 
length of the string and a pointer to the first memory 
location of the string. As strings are manipulated, 
string space fills up with intermediate results and 
wextraneous material as well as the desired string 
information. When this happens, BASIC'S "garbage 
collection" routine clears out the unwanted material. The 
frequency of gargbage collection is inversely proportional 
to the amount of string space. The more string space 
there is, the longer it takes to fill with garbage. The 
time garbage collection takes is proportional to the 
square of the number of string variables. Therefore, to 
minimize garbage collection time, make string space as 
largge as possible and use as few string variables as 
possible. 
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APPENDIX D 
MATHEMATICAL FUNCTIONS 



1. Derived Functions. 



The following functions, while not intrinsic to ALTAIR BASIC, 
can be calculated using the existing BASIC functions: 



Function: 

SECANT 
COSECANT 
COTANGENT 
INVERSE SINE 
INVERSE COSINE 

INVERSE SECANT 

INVERSE COSECANT 

INVERSE COTANGENT 
HYPERBOLIC SINE 
HYPER30LIC COSINE 
HYPERBOLIC TANGENT 

HYPERBOLIC SECANT 
HYPERBOLIC COSECANT 
HYPERBOLIC COTANGENT 

INVERSE HYPERBOLIC 

SINE 

INVERSE HYPERBOLIC 

COSINE 

INVERSE HYPER30LIC 

TANGENT 

INVERSE HYPERBOLIC 

SECANT 

INVERSE HYPERBOLIC 

COSECANT 

INVERSE HYPERBOLIC 
COTANGENT 



BASIC equivalent: 

SEC(X) = l/COS(X) 

CSC(X) = 1/SIN(X) 

COT(X) = 1/TAN(X) 

ARCSIN(X) = ATN(X/SQR(-X*X+1) ) 

ARCCOS(X) = -ATN X (X/SQR(-X*X+1) ) 

+1.5708 
ARCSEC(X) = ATN(XSQR{X*X-1) ) 

+SGN(SGN(X)-1)*1.5708' 
ARCCSC(X) = ATN(1/SQR(X*X-1)) 

+(SGN(X)-1)*1.5708 
ARCCOT(X) = ATN (X) +1.5708 
SINH(X) = (EXP(X)-EXP(-X) )/2 
COSH(X) = (EXP(X)+EXP(-X) )/2 
TANH(X) = EXP(-X)/EXP(X)+EXP(-X) ) 

*2 + l 
SECH(X) = 2/(EXP(X)+EXP(=X) ) 
CSCH(X) = 2/(EXP(X)-EXP(-X)) 
COTH(X) = EXP(-X)/(EXP(X)-EXP(-X) ) 

*2 + l 

ARCSINH(X) = LOG(X+SQR(X*X+l) ) 

ARCCOSH(X) = LOG(X+SQR(X*X+-l) ) 

ARCTANH(X) = LOG ( ( 1+X) / (1-X) )"/2 

ARCSECH(X) = LOG( (SQR(-X*X+1)+1)/X) 

ARCCSCH(X) = LOG((SGN{X)* 
SQR(X*X+1)+1)/X 

ARCCOTH(X) = LOG( (X+1)/(X-1) )/2 



2. Simulated Math Functions. 

The following subroutines are intended for 4K BASIC users who 
want to use the transcendental functions not built into 4K 
BASIC. The corresponding routines for these functions in the 
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GOSUB 


60030 


GOSUB 


60090 


GOSUB 


60160 


GOSUB 


60240 


GOSUB 


60280 


GOSUB 


60310 



8K version are much faster and more accurate. The REM 
statements in these subroutines are given for documentation 
purposes only, and should not be typed in because they take up 
a large amount of memory. The following ■ are the subroutine 
calls and their 8K equivalents: 

8K EQUIVALENT 4K SUBROUTINE CALL 

P9=X9~Y9 

L9=LOG(X9) 

E9=EXP(X9) 

C9=COS(X9) 

T9=TAN(X9) 

A9=ATN(X9) 

The unneeded subroutines should not be typed in. Please note 

which variables are used by each subroutine. Also note that 

TAN and COS require that the SIN function be retained when 
BASIC is loaded and initialized. 

60000 REM EXPONENTIATION: P9=X9~Y9 

60010 REM NEED: EXP, LOG 

60020 REM VARIABLES USED: A9 ,39 ,C9 ,E9 , L9 ,P9 ,X9 , Y9 

60030 REM P9 =1 : E9=0 : I? Y9=0 THEN RETURN 

60040 IF X9<0 THEN IF INT(Y9)=Y9 THEN P9=1-2*Y9+4*INT (Y9/2) 

: X9=-X9 

60050 IF X9O0 THEN GOSUB 60090 : X9=Y9*L9 : GOSUB 60160 

60060 P9=P9*E9 : RETURN 

60070 REM NATURAL LOGARITHM: L9=LOG(X9) 

60080 REM VARIABLES USED: A9",B9 ,C9 ,E9 ,L9 ,X9 

60090 E9=0 : IF X9< = THEN PRINT "LOG FC ERROR"; : STOP 

60100 A9*l: B9-2: C9=.5: REM THIS WILL SPEED THE FOLLOWING 

60110 IF X9>=A9 THEN X9=C9*X9 : E9=E9+A9 : GOTO 60100 

60120 X9=(X9-.707107)/(X9+. 7077107) : L9=X9*X9 

6013 L9={ ( (. 598979*L9+. 961471 )*L9+2. 88539 )*X9+E9-. 5)* 

.693147 

6013 5 RETURN 

60140 REM EXPONENTIAL : E9=EXP(X9) 

60150 REM VARIA8LES USED: A9,E9,L9,X9 

60160 L9-INT(1.4427*X9)+1 : IF L9<127 THEN 60180 

60170 IF X9>0 THEN PRINT "EXP OV ERROR"; : STOP 

60175 E9=0 : RETURN 

60180 E9=.693147*L9-X9 : A9=l . 32988E-3-1 . 41316E-4*E9 

60190 A9=( (A9*E9-8.30136E-3) *E9+4 . 16574E-2) *E9 

60195 E9=( (A9-. 166665) *E9-1)*E9+1 : A9=2 

60197 IF L9<=0 THEN A9=.5 : L9=-L9 : IF L9=0 THEN. RETURN 

60 20 FOR X9=l TO L9 : E9=A9*E9 : NEXT X9 : RETURN 

60210 REM COSINE: C9=COS(X9) 

60220 REM N.B. SIN MUST BE RETAINED AT LOAD-TIME 

60230 REM VARIABLES USED: C9,X9 

6 240 C9=SIN(X9+1.570 8) : RETURN 

60 250 REM TANGENT: T9=TAN(X9) 
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60260 


60270 


60280 


60290 


60300 


60310 


60320 


60330 


60340 



REM NEEDS COS. (SIN MUST 3E RETAINED AT LOAD-TIME) 

REM VARIABLES USED: C9,T9,X9 

GOSUB 60240 : T9=SIN (X9) /C9 : RETURN 

REM ARCTANGENT : A9=ATN(X9) 

REM VARIABLES USED: A9 ,39 ,C9 ,T9 ,X9 

T9=SGN(X9): X9=ABS (X9) :C9=0 : IF X>1 THEN C9-1: X9=l/X9 

A9=X9*X9 : B9= ( (2 . S6623E-3*A9-1 . 61657E-2) *A9 

+4.29096E-2)*A9 
B9=( ( ( (39-7.5289E-2) *A9+. 106563 ) *A9-. 11420 89) *A9+. 199936) *A9 
A9=( (B9-. 333332) *A9+1)*X9 : IF C9=l THEN A9=1.5708-A9 
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APPENDIX E 
BASIC AND ASSEMBLY LANGUAGE 

All versions of Altair BASIC have provisions for 
interfacing with assembly language routines. The USR function 
allows Altair BASIC programs to call assembly language 
subroutines in the same manner as BASIC functions. 

The first step in setting up a machine language 
subroutine for an Altair BASIC program is to set aside memory 
space. When BASIC asks, "MEMORY SIZE?" during initialization, 
the response should be the size of memory available minus the 
amount needed for the assembly language routine. BASIC uses 
all the bytes it can find from location zero up, so only the 
topmost locations in memory can be used for user supplied 
routines. If the answer to the MEMORY SIZE? question is too. 
small, BASIC will ask the question again until it gets all the 
memory it needs. See Appendix C for Altair BASIC'S memory 
requirements. 

The assembly language routine may be loaded into memory 
from the front panel switches or from a BASIC orogram by means 
of the POKE statement. 

The starting address of the assembly language routine 
goes in USRLOC, a two byte location in memory which varies 
from version to version. USRLOC for 4K and 8K Altair BASIC 
version 4.0 is 111 octal. In Extended and Disk, USRLOC need 
not be known explicitly since it is defined automatically by 
DEFUSR (section 5-3b) . The function USR calls the routine 
whose address is in USRLOC. Initially, USRLOC contains the 
address of ILLFUN, the routine which gives the PC or ILLEGAL 
FUNCTION CALL error. If USR is called without an address 
loaded in USRLOC, an ILLEGAL FUNCTION CALL error results. 

When USR is called, the stack pointer is set up for 8 
levels (16 bytes) of stack storage. If more stack space is 
needed, BASIC'S stack can be saved and a new stack set up for 
use by the assembly language routine. BASIC'S stack must be 
restored, however, before returning from the user routine. 

All memory and all the registers can be changed by a 

user's assembly language routine. Of course, memory locations 

within BASIC ought not to be changed, nor should more bytes be 

popped off the stack than were put on it. 

USR is called with a single argument. The assembly 
language routine can retrieve this argument by calling the 
routine whose address is in locations 4 and 5 decimal. The 
low-order byte of the address is in 4 and the high-order in 5. 
In 4K and 8K, this routine (DEINT) stores the argument in the 
register pair [D,E] . In Extended and Disk, the arauraent is 
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passed in pair [H,L] . The argument is truncated to integer in 
4K and 8K, and if it is not in the range -32768 to 32767, an 
FC error occurs. In Extended and Disk, the register pair 
[H,L] contains a pointer to the Floating Point Accumulator 
where the argument is stored (see section 5-3b. for more 
information about use of the Floating Point Accumulator) . 

To pass a result back from an assembly language routine,, 
load the value in register pair [A,B] in 4K and 8K, or [H,L] 
in Extended. This value must be a signed, 16 bit integer as 
defined above. Then call the routine whose address is in 
locations 6 and 7. If this routine is not called, USR(X) 
returns X. To return to BASIC, then, the assembly language 
routine executes a RET instruction. 

Assembly language routines can be written to handle 
interrupts. Locations 56, 57 and 58 are used to hold a J MP 
instruction to a user supplied interrupt handling routine. 
Location 56 initially holds a BET, so it must be set up by the 
user or an interrupt will have no effect. 

All interrupt handling routines should save the stack, 
registers A-L and the PSW. They 'should also reenable 
interrupts before returning since an interrupt automatically 
disables all further interrupts once it is received. 

There is only one way to call an assembly language 
routine in 4K and 8K, but this does not limit the programmer 
to only one assembly language routine. The argument of USR 
can be used to designate which routine is being called. In 
8K, additional arguments can be passed through the use of POKE 
and values may be passed back by PEEK. 

In Extended and Disk BASIC, up to ten routines may be 
called with the OSR0 - USR.9 functions. For more information 
on this feature, see section 5-3b. 



EASIC 4.1 -^ 

April, 1977 



APPENDIX F 
USING THE ACR INTERFACE 



NOTE 

The cassette features , CLOAD and CSAVE , are only 
present in 8K Altair BASICS which are distributed on 
cassette and in Extended and Disk versions. 8K BASIC 
on paper tape will give the user about 250 additional 
bytes of free memory, but it will not recognize the 
CLOAD or CSAVE commands. 



Programs may be saved on cassette tape by means of the 
CSAVE command. CSAVE may be used in either direct or indirect 
mode, and its format is as follows: 

CSAVE <string expression> 

The program currently in memory is saved on cassette under the 
name specified by the first character of the <string 
expressions CSAVE writes through channel 7 when the Write 
Buffer Empty bit (bit 7) of channel 6 is low. After CSAVE is 
completed, BASIC always returns to command level. Programs 
are written on tape in BASIC'S internal representation. 
Variable values are not saved on tape, although an indirect 
mode CSAVE does not affect the variable values of the orogram 
currently in memory. The number of nulls (see NULL command) 
has no affect on the operation of CSAVE. Before using CSAVE, 
turn on the cassette recorder. Make sure the tape is in the 
proper position then put the recorder in RECORD mode. 

Programs may be loaded from cassette tape by means of the 
CLOAD command, which has the same format as CSAVE. The effect 
of CLOAD is to execute a NEW command, clearing memory and all 
variable values and loading the specified file into memory. 
When done reading and loading, BASIC returns to command level. 
CLOAD reads a byte from channel 7 when the Read Data Ready bit 
(bit 0) in channel 6 is low. Reading continues until 3 
consecutive zeros are read. BASIC will not return to command 
level after a CLOAD if it could not find the requested file, 
or if the file was found but did not end with 3 zeros. In 
that case, the computer will continue to search until it is 
stopped and restarted at location 0. 
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In the 8K cassette and Extended versions of ALTAIR BASIC, 
data may be read and written with the CSAVE* and CLOAD* 
commands. The formats are as follows: 

CSAVE*<array variable name) 

and 

CLOAD*<array variable name> 

See section 2-4d for a discussion of CSAVE* and CLOAD* for 
array data. 

CLOAD? < string expression> compares the program currently 
in memory with the specified file on cassette. If the two 
files match, BASIC prints OK. If not, BASIC Prints NO GOOD. 

Data may also be read from and written on cassette in the 
paper tape version of 8K Altair BASIC. To write data, execute 
a WAIT 6,128 statement to check for the Write Buffer Empty bit 
and then write with an OUT 7,<byte> statement. To read, 
execute a WAIT 6,1 to check for Read Data Ready and then read 
with an INP(7) j . The end of a block of data may be 
conveniently designated by a special character. Data should 
be stored in array form since there is no time during reading 
and writing for computation. 
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APPENDIX G 
CONVERTING BASIC PROGRAMS 
NOT WRITTEN FOR THE ALTAIR COMPUTER 



Though implementations of BASIC on different computers 
are in many ways similar, there are some incompatibilities 
between ALTAIR BASIC and the BASIC used on other computers. 

1) Strings. 

A number of BASICS require the length of strings to be 
declared before they are used. All dimension statements of 
this type should be removed from the program. In some of 
these BASICS, a declaration of the form DIM AS (I, J) declares a 
string array of J elements each of which has a length I. 
Convert DIM statements of this type to equivalent ones in 
Altair BASIC: DIM A$ (J) . Altair BASIC uses " + " for string 
concatenation, not " , " or " & ." ALTAIR BASIC uses LEFTS, 
RIGHTS and MID$ to take substrings of strings. Some other 
BASICS use A${I) to access the Ith character of the string A$, 
and A$(I,J) to take a substring of A$ from character position 
I to character position J. Convert as follows: 



OLD 

A$(I) 

A$(I,J) 



NEW 
MID$(A$,I,1) 

MID$ (A$,I,J-I+1) 



This assumes that the reference to a subscript of A$ is in an 

expression or is on the right side of an assignment. If the 

reference to A$ is on the left hand side of an assignment, and 

X$ is the string expression used to replace characters in A$ , 
convert as follows: 



In 4K and 8K 
OLD 

A$(I)-X$ 
A$(I,J)=X$ 

Extended and Disk 

OLD 

A$ (I)=X$ 

A$(I,J)=X$ 



NEW 

A$=LEFT$ (A$,I-1)+X$+MID$ (A$,I+1) 

A$=LEFT$ (A$,I-1)+X$+MID$ (A$,J+1) 



NEW 

MID$ (A$,1,1)=X$ 

MID$ (A$,I,J-I+1)=X$ 



2) Multiple assignments. 

Some BASICS allow statements of the form: 
500 LET B=C=8 
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This statement would set the variables 3 and C to zero. In 8K 
Altair BASIC, this has an entirely different effect. All the 
" = "signs to the right of the first one would be interpreted 
as logical comparison operators. This would set the variable 
B to -1 if C equaled 0. If C did not equal 0, B would be set 
to 0. The easiest way to convert statements like this one is 
to rewrite them as follows. 

500 O0:B=C 

3) Some BASICS use " \ " instead of " : '* to delimit multiple 
statements on a line. Change each " \ " to " : " in the 
program. 

4) Paper tapes punched by other BASICS may have no nulls at 
the end of each line instead of the three per line recommended 
for use with Altair BASIC. To get around this, try to use the 
tape feed control on the Teletype to stop the tape from 
reading as soon as Altair BASIC prints a carriage return at 
the end of the line. Wait a moment, and then continue feeding 
in the tape. When reading has finished, be sure to punch a 
new tape in Altair BASIC'S format. 

A program for converting tapes to Mtair 3ASIC's format 
was published in MITS Computer Notes, November 1976, p. 25. 

5) Programs which use the MAT functions available in some 
BASICS will have to be rewritten using FOR... NEXT loops to 
perform the appropriate operations. 
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APPENDIX H 
DISK INFORMATION 



Format of Altair Flooov Disk 



Track Allocation: 

Tracks Use 

0-5 Disk BASIC memory image. 

6-69 Space for either random or sequential files. 

70 Directory track. See below. 

71-76 Space for sequential files only. 

Format of DISK BASIC Memory Image (Tracks 0-5) : 



3ASIC is loaded starting at track sector then track 
sector 1, etc. Each sector contains 128 bytes of BASIC. The 
first 128 bytes are loaded first, second 128 second, etc. 



Sector format {Tracks 0-5) : 

Byte Use 

Track Number+128 decimal. 

1-2 Sixteen bit address of the next 

higher byte of memory than the highest memory location 

saved on this sector. 
3-130 128 bytes of BASIC. 

131 255 decimal stop byte. 

132 Checksum - sum of bytes 3-130 with no carry in 8 bits. 



Sector format (Tracks 6-76) : 

Byte Use 

Most Significant Bit always on. 
Contains track number plus 200 octal. 

1 Sector number * 17 MOD 32. 

.2 File number in directory. Zero file number means 
that the sector is not part of any file. If the 
sector is the first file of a group of 8 sectors 
means the whole group of 8 sectors is free. 

3 Number of data bytes written (0 to 128) . Always 
128 for random files. (Except for the random file 
index blocks in which case this byte indicates how many 
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groups ace allocated to the file.) 
4 Checksum. The sum of all the data on the sector 
except for the track number, the sector 
number and the terminating 255 byte. 
5/6 Pointer to the next group of data. This is set up for 
random files and sequential files, and is even valid 
in the middle of a group. If it is zero it means there 
is no more- data in the file. The track is the first byte 
and the sector number is the second byte. 
7-134 Data 

135 A 255 (octal 377) to make sure the right number 
of data bytes were read. 

136 Unused. 

Directory Track (70) Format: 

Each sector of the directory (which is all of track 70) 
is composed of up to 8 file name slots, 16 bytes per slot. 
Each slot can contain a file name (8 bytes), a link to the 
start of file data (2 -bytes) and a byte which specifies the 
mode of a file (Random=4, Sequential^). The remaining 5 
bytes are not currently used. Any slot which has the first 
file name byte equal to zero contains a file which has been 
deleted. If the first byte of a slot is a 255 , i-t is the 
last slot currently in use in the directory. Slots beyond the 
"stopper" are garbage. File numbers are calculated by 
multiplying the sector number of the directory track the file 
is in by 8 and adding the position of the slo't in the sector 
(0-7) plus 1. 



NOTE 

The ith logical sector on a track is actually mapped 
to the i*17 MOD 32 physical sector to shorten access 
time in BASIC I/O operations. 



. Format of Random Files 

Each random file starts with two random index blocks. The 
"number of data bytes" field in the first block indicates how 
many groups are currently allocated to this random file. The 
next 256 bytes in the two random index blocks give the 
location of each group in the random file in order of their 
position in the file. The upper two bits give the group 
number , and the lower six bits give the track number - 6. 
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Assembly Code to Read and Write a Sector 



The following code has been provided to helo users write their 
own assembly language subroutines to read and write data on 
the floppy disk. It is assumed that the disk being used 
already been enabled and positioned to the correct track, 
data bytes are always read or written at a time so that the 
CPU can keep up with the data rate (32 microseconds/byte) of 
the floppy disk. After two bytes are read or written, the CPU 
re-synchronizes with the next 'byte ready' status 
floppy disk controller. 



has 
Two 



from the 



CALL WITH NUMBER OF DATA BYTES TO WRITE 
AND POINTER TO DATA BUFFER IN [H,L] ' 
ALL REGS DESTROYED. 



IN [A] 



DSKO: 



MOV 


C,A 


MVI 


A, 136 


SUB 


C 


MOV 


B,A 


CALL 


SECGET 


MVI 


A, 128 


OUT 


9 



;SAVE # OF BYTES IN C 

; CALCULATE NUMBER OF ZEROS TO WRITE 

; SUBTRACT THE NUMBER OF DATA BYTES 

; NUMBER OF ZEROS+1 

; LATENCY 

? ENABLE WRITE WITHOUT SPECIAL CURRENT 



CALL WITH [B]=NUM3ER OF ZEROS [C]=NUMBER OF DATA BYTES 
AND [H,L] POINTING AT OUTPUT DATA 



OHLDSK: 


MVI 


D,l 




MVI 


A, 128 




ORA 


M 




MOV 


E,A 




INX 


H 


NOTYTD : 


IN 


8 




ANA 


D 




JNZ 


NOTYTD 




ADD 


E 




OUT 


10 




MOV 


A f M 




INX 


H 




MOV 


E,M 




INX 


H 




DCR 


C 




JZ 


ZRLOP 




DCR 


C 




OUT 


10 




JNZ 


NOTYTD 


ZRLOP: 


IN 


8 




ANA 


D 




JNZ 


ZRLOP 




OUT 


10 




DCR 


3 



SETUP A MASK (READY TO WRITE) 

HIGH BIT (D7) ALWAYS ON IN FIRST BYTE 

OR ON DATA BYTE 

SAVE FOR LATER 

INCREMENT BUFFER POINTER 

GET WRITE DATA READY STATUS 

TEST STATUS BIT 

NOT READY TO WRITE, WAIT 

ADD BYTE WE WANT TO SEND TO ZERO 

SEND THE 3YTE 

GET NEXT BYTE TO SEND 

MOVE BUFFER POINTER AHEAD 

GET NEXT DATA BYTE 

MOVE BUFFER POINTER AHEAD AGAIN 

DECREMENT COUNT OF CHARS TO SEND 

IF DONE, QUIT & GO TO ZRLOP 

DECREMENT COUNT OF CHARS AGAIN 

SEND THIS BYTE 

STILL MORE CHARS , DO THEM. 

GET READY TO WRITE 

IS IT READY 

IF NOT, LOOP 

KEEP SENDING FINAL BYTE 

DECREMENT COUNT OF EYTES TO SEND 
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JNZ 

EI 

MVI 

OUT 

RET 



2RLOP 

A, 8 
9 



?KEEP WAITING 

; RE-ENABLE INTERRUPTS 

; UNLOAD HEAD 

;SEND COMMAND 

;DONE 



; DISK INPUT 
; OF 13 7 BYTE 



DSKI: 


CALL 


SECGET 




•MVI 


C,137 


READOK : 


IN 


8 




ORA 


A 




JM 


READOK 




IN 


10 




MOV 


M,A 




INX 


H 




DCR 


C 




JZ 


RETDO 




DCR 


C 




• NOP 






IN 


10 




MOV 


M,A 




INX 


H 




JNZ 


READOK 


RETDO: 


EI 






MVI 


A, 8 




OUT 
RET 


9 


SECGET: 


MVI 


A, 4 




OUT 


9 




DI 




SECLP2: 


IN 
RAR 


9 




JC 


SECLP2 




AN I 


31 




CMP 


E 




JNZ 


SECLP2 




RET 





ROUTINE. ENTER WITH POINTER 
BUFFER IN [H,L]. ALL REGS DESTROYED. 

;?OINT TO RIGHT SECTOR 
;GET # OF CHARS TO READ 
;GET DISK STATUS 
; READY TO READ BYTE 



READ THE STUFF 

SAVE IN BUFFER 

BUMP DESTINATION POINTER 

LESS CHARS 

IF OUT OF CHARS, RETURN 

DECREMENT COUNT OF CHARS 

DELAY INTO NEXT BYTE 

GET NEXT BYTE 

SAVE BYTE IN BUFFER 

MOVE BUFFER POINTER 

IF CHARS STILL LEFT, LOOP BACK 

RE-ENABLE INTERRUPTS 

UNLOAD HEAD 

SEND COMMAND 



;LOAD THE HEAD 

DISABLE INTERRUPTS 

GET SECTOR INFO 

FIX UP SECTOR # 

IF NOT, KEEP WAITING 

GET SECTOR # 

IS IT THE ONE WE WANTED 

TRY TO FIND IT 



The Disk PROM Bootstrap Loader 



The Disk Bootstrap Loader PROM must be 
highest position on the PROM board and the 
strapped at the proper address. The proper 
PROM IC socket on the opposite side of 
black finned heat sink. The black dot or 
should be . in the upper left corner. The 
the PROM board must be in the ' 1' position. 



installed in the 

PROM board must be 

position is the 

the board from the 



' 1' on 

address 



the PROM 
jumpers on 
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To use the Disk Bootstrap Loader, turn the computer's power 
on. Raise RESET and STOP simultaneously. Lower RESET and 
then STOP. EXAMINE location 177400 (address switches A15-A8 
up, rest down) and then set the sense switches for the 
terminal I/O board as explained in Appendix B. Depress the 
RUN switch. BASIC should print (or display) : 

MEMORY SIZE? 

For the rest of the initialization procedure, see below. 

Using the Cassette and Paper Tape Bootstraps 

If the Disk Bootstrap Loader PROM is not in use, a paper tape 
or cassette program must be loaded which then reads in BASIC 
from the disk. This is done by following the procedure below: 

1. Key in the applicable paper tape or cassette bootstrap 
loader from the listings in Appendix B. Make 
location 2=077 octal. Set the sense switches for the 
terminal. 

2. Start the paper tape or cassette (labeled DISK LOADER) 
reading, and then start the computer as in the 
instructions for loading BASIC from paper tape from 
cassette as given in Appendix B. 

BASIC should respond: 

MEMORY SIZE? 

For the rest of the initialization procedure, see below. 

Disk Initialization Dialoa 



The initialization dialog has been expanded to allow the user 
to select the proper amount of memory needed to use the 
disk(s) on the system. After the the MEMORY SIZE question is 
answered, BASIC will ask: 

HIGHEST DISK NUMBER? 

The user should answer with the highest physical disk address 
in the system or with a carriage return. The default is 0. 
Each additional disk uses 40 bytes of memory. 
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Example: 



HIGHEST DISK NUMBER? 1 

BASIC next asks how many files are to be OPEN at one time in 
the program. This number includes both random and sequential 
files. If the user types carriage return, the default is 
zero. Each file allocated requires 138 bytes for buffer 
space. Example: 

HOW MANY FILES? 2 

Finally/ BASIC asks how many random files are to be OPEN at 
one time. The amount of memory allocated is the answer *257. 
This memory space is used to keep track of the location on the 
floppy disk where groups of a random file reside. Thus, the 
total memory required for each random file is 138+257=395 
bytes. Example: 

HOW MANY RANDOM FILES? 1 

A typical dialog might appear as follows: 

MEMORY SIZE? <carriage return> 

HIGHEST DISK NUMBER? <carriaae return> 

HOW MANY FILES? 2 <carriage return> 

HOW MANY RANDOM FILES? 1 <carriage return> 

xxxxx BYTES FREE 
ALTAIR BASIC REV. 4.0 
[DISK EXTENDED VERSION] 
COPYRIGHT 1976 BY MITS INC. 

OK 
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APPENDIX I 



THE PIP UTILITY PROGRAM 



A BASIC Utility program has been provided to perform such such 
common functions as printing directories, initializing disks, 
copying disks etc. 



NOTE 

Some of the PIP commands (LIS, DIR) require that one 
<file number> be configured during the Disk BASIC 
initialization dialog. This is done by answering the 
"HOW MANY FILES?" question with a value greater than 
zero. If an attempt is made to perform a LIS or DIR 
without following this procedure, a BAD FILE NUMBER 
error will occur. 



Once the BAS-IC disk has been mounted, type the following 
command : 

RUN "PIP"<carriage return> 

(PIP will type) 
* 

PIP is now ready to accept commands. To exit PIP, type a 
carriage return to the prompt asterisk. To initialize the 
floppy disk in drive 0, type: 

*INI0 

PIP will type "DONE" when it is finished. Any disk number may 
be substituted for the in the above command and PIP will 
format the disk in that drive. Any previous files on the disk 
initialized will be lost. If you wish to use blank disks with 
Disk BASIC, they must be initialized in this fashion before 
they can be MOUNTed . 

NOTE 

DO NOT INITIALIZE THE DISK WITH DISK EXTENDED BASIC ON 
IT. THIS WILL WIPE OUT ALL THE FILES PROVIDED ON THE 
DISK. 
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Printing a Directory 

Giving PIP the command: 

*DIR<disk number> 

prints out a directory of the files on the specified disk. 
The name of each file is printed along with the file's "mode" 
(S for sequential, R for random) and the starting track and 
sector number of the first block in the file. 

SRT<disk number > 

prints a sorted directory of the files on the specified disk. 

Listing Sequential Files 



The LIS command is used to list the contents of a sequential 
data file on the terminal: 



Syntax: 

LIS<disk number> ,<f ile name> 

Example: 

*LIS0,PIPA user types 

7 CLEAR 1000 computer prints 



COPying Disks 



The COP command is used to copy a disk placed in one drive to 
a disk on another drive. Neither disk need be MOUNTed for the 
COP command to work properly. 



Syntax: 

COP<old disk number>,<new disk number> 
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Before the copy is done, PIP verifies the action by printing 
the following massage: 

FRQM<disk number>TO<disk number> 

Typing Y followed by a carriage return causes execution to 
proceed. Any other response aborts the command. Examole: 

*COP0,1 

FROM TO 1? Y<carriage return> 

DONE 
* 



The DAT command 

The DAT command is used to dump out a particular sector of the 
disk in octal. 

Syntax: 

DAT<disk number> 

When the DAT command is issued, PIP asks for the numbers of 
the track and sector to be dumped. Example: 

*DAT0 " (DAT is equivalent) 

TRACK? 

SECTOR? 

000 000 000 000 000 000 000 000 

000 000 000 000 000 etc. 



The CNV command 



CNV converts disks written under Altair BASIC version 3.4 and 
3.3 to a format useable by version 4.0. The format of the 
command is as follows: 

CNV<disk number> 

CNV makes sure that the next to last bvte of each sector is 
255. 



Other Programs Provided on the System Disk 
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Program Name Use 

STARTREK Plays game based on TV series. 
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APPENDIX J 



RSTLESS VERSIONS OF BASIC 



Altair BASIC uses the so-called RST locations (locations 
through 100 octal) at the bottom of memory. This saves 
memory space, but precludes the use of the Vector Interrupt 
board for real-time programming applications. Soecial 
versions of Altair BASIC are available which do not use the 
RST locations, however. These versions leave the RST 
locations free to be used for assembly language routines in 
the same was as any other locations in high memory. 

To restart the standard versions of Altair BASIC, it is 
necessary simply to actuate the RESET switch on the computer's 
front panel. This causes a jump to location 0. in the 
RSTLESS version, BASIC is restarted by jumping to location 100 
octal. The usual procedure for doing this is as follows: 

1. Raise STOP and RESET simultaneously, then release them 

2. Raise switch A6 

3. Actuate EXAMINE 

4. Push RUN 

BASIC restarts and prints "OK." 
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APPENDIX K 



USING Altair BASIC ON THE 
'INTELLEC* 3/MOD 80 AND MDS SYSTEMS 



This appendix covers procedures for loading and operating 
Altair 3ASIC on Intellec and MDS development systems. 

A. Loading BASIC. 

To load Altair BASIC, put the hex paper tape of 3ASIC in 
the system reader device. Enter the System and assign the 
CONSOLE I/O device as desired (see Section 4.2.1 of the 
Intellec 8/Mod 80 Operator's Manual). Now read in BASIC with 
the following R command. 

.R(Cr) 



The BASIC tape will be loaded into memory, and the system 
monitor will type a period on the CONSOLE device. If you are 
only using contiguous RAM memory below the system monitor 
(3800H) or are using BASIC on a MDS System, proceed to step 2. 
If you have RAM memory above the PROM Intellec monitor which 
you wish BASIC to use for program and variable storage, you 
must patch the two locations known as INTLOC to point to the 
bottom (lowest address) of memory. The is most ea-sily 
accomplished by using the System Monitor S command. INTLOC is 
given below under "Memory Requirements." 

.SXXXX 00 40 (Cr) 

The above S command would make INTLOC ooint to RAM, starting 
at 16K. 



NOTE 

If you are using RAM above 1SK for program and 
variable storage and have patched INTLOC", retain all 
the math functions at initialization time (see 
Appendix 3) . Essentiallv, this means that the WANT 
SIN-COS-TAN- ATM? questions asked by BASIC'S 
initialization dialog should be answered by a Y(Cr) . 
Also, you must answer the MEMORY SIZE? question with 
the highest decimal or RAM address in your system. 



BASIC 4.1 
April, 1977 



129 



130 



Start BASIC by giving the monitor GOTO command. 
.G0000<carriage return> 

NOTE 

Once BASIC has been started, it may always be 
restarted by depressing the RESET switch on the 
Intellec 8 console. 



When BASIC types MEMORY SIZE?, typing carriage return will 
cause BASIC to use all the RAM memory it can find above the 
end of BASIC. Otherwise, if you wish to specify an exact 
amount of memory, type the decimal address of the highest byte 
of memory in the computer and type carriage return. 

B. BASIC I/O. 

The system devices used for terminal I/O in BASIC are CI, 
CO and CSTS. 

C. Saving and Loading Programs. 

To save a program on paper tape, re-enter the PROM 
monitor and reassign the CO device to the paper tape punch or 
other output device. Then restart BASIC by using the G0000 
command and type LIST(Cr). The characters of the LIST command 
will not be echoed, but the BASIC program currently saved in 
memory will be put on the output device. 

To load a program, enter the system monitor, re-assign CI 
to the input device where the program resides, and then start 
BASIC with a G0000. When the program has been completely read 
in, reassign CI to the user console. Then re-enter BASIC with 
a G0000, and start the I/O device. The program will be echoed 
on CO as it is read in. 

D. Memory Requirements 

BASIC uses locations 0000H-0003H and 0010H-approximately 
19DFH in the 8K version, and 0010H-2F0EH .in the Extended 
version. For Intellec 8K and MDS 8K BASICS, INTLOC is 6520 
decimal. For MDS Extended, INTLOC is 14257 decimal. 

E. Calling Assembly Language Routines 

USRLOC for 8K 3ASIC is 0055H. ADR(DEINT) is stored in 
locations 0043H. ADR(GIVACF) is stored in location 0045H. In 
the Extended version, these locations contain the addresses of 
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FRCINT and MAKINT, respectively. Interrupt driven subroutines 
using RST 7 are not allowed in the Inteilec/MDS version of 
Altair BASIC. See Appendix C for further information on 
calling assembly language subroutines. 

* Intellec is a registered trademark of the Intel 
Corporation. 
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APPENDIX L 
PATCHING BASIC'S I/O ROUTINES 



BASIC'S I/O routines may be changed to accommodate 
non-standard terminal equipment. After BASIC is loaded and 
before it has been initialized, location 71 contains a pointer 
to a list of addresses. These addresses contain the I/O 
routines of BASIC: 



ORG 

DW 



7Q1 
IOLST 



;TWO BYTE ADDRESS OF ADDRESS LIST 



IOLST: 



DW 


TRYIN 


DW 


TRYOUT 


DW 


ISCNTC 


DW 


NEWSTT 


DW 


IN23IO 


DW 


IN4PI0 


DW 


LPTPOS 


DW 


LPT3CD 


DW 


ENDLPT 


DW 


IOCHNL 



CHARACTER INPUT ROUTINE 

ADDRESS OF OUTPUT ROUTINE 

POLL FOR CONTROL/C CHECK 

FAST POLL FOR CONTROL/C CHECK 

3K AND LARGER ONLY 

ADDRESS OF INITIALIZATION 

ROUTINE FOR 2SIO BOARDS 

ADDRESS OF INITIALIZATION ROUTINE FOR 

4PIO BOARDS 

ADDRESS OF LPT CODE FLAGS 

START OF LPT CODE 
END OF LPT CODE 

ADDRESS OF I/O RESET LOCATION 
(IN EXTENDED AND DISK ONLY) 



TRYOUT: IN 





AN I 


200 


JNZ 


TRYOUT 


POP 


PSW 


OUT 


1 


. PUSH 


PSW 


NOP 




NOP 




POP 


PSW 


RET 





GET DEVICE STATUS 

AND OFF BIT 7 

WAIT UNTIL TERMINAL CAN OUTPUT 

GET CHARACTER TO OUTPUT OFF STACK 

TRANSMIT IT 

SAVE CHARACTER BACK ON STACK 

CHANGED TO "IN 41" FOR 4PIO BOARDS 

;GET CHARACTER BACK OFF STACK 

;ALL DONE WITH CHARACTER OUTPUT ROUTINE 



TRYIN : 



IN 





AN I 


1 


JNZ 


TRYIN 


IN 


1 


AN I 


127 



;GET TERMINAL STATUS 
CHARACTER READY? 
;NO, KEEP WAITING 
;READ IN THE CHARACTER 
;GET RID OF PARITY BIT 
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CPI 
RNZ 



COHTO 



; CONTROL/O? 

; RETURN IF NOT 



ISCNTC: IN 
ANI 11 

RNZ 



;READ TERMINAL STATUS 

;HAS THE TERMINAL A CHARACTER 

;TO SEND? 
;NO, RETURN 



; FOLLOWING ROUTINE IS IN 3K AND LARGER VERSIONS ONLY 

;AND IS EXECUTED FOR EACH STATEMENT 

NEWSTT: IN - ;READ TERMINAL STATUS 

ANI 1 ;TEST BIT 

CZ CNTCCN ;YES, SEE IF CHARACTER CONTROL/C 



IN2SIO: 


CPI 
RNC 


2*4 




ADI 


21 




PUSH 


PSW 




MVI 


A, 3 




CALL 


DOIO20 




POP 


PSW 




JMP 

• 


DOIO20 


IN4PIO: 


* 

• 

MVI 


A,54Q 




DCR 


M 




CALL 


DOIO20 



;IS IT 2SIO 

?NO, OTHER GO DIRECTLY TO SETIO 

; GET PROPER INITIALIZATION BYTE 

;SAVE IT 

INITIALIZE THE 2SIO 

;GET BACK SECOND INITIALIZATION BYTE 
; PROGRAM TO DATA AND STOP BITS 



; RESET FOR DATA TRANSFER 
;CHANNEL=22 



The pointers LPTPOS, LPTCD3 and ENDLPT refer to the 
following sections of lineprinter code: 



A. LPT code flags. 
LPTLST: DB 



LPTPOS : DB 
PRTFLG: DB 







MEANS LAST LPT OPERATION 
WAS LINE FEED 

1 MEANS LAST LPT OP'N WAS PRINT 
CURRENT LOGICAL POSITION OF LPT HEAD 

MEANS OUTPUT TO CONSOLE 

1 MEANS OUTPUT TO LPT 

2 MEANS LLIST OUTPUT TO LPT 



BASIC 4.1 
April, 1977 



133 



QPOS: 
QMOV: 



DB 
DB 
DB 



LPTLEN: DB 
NLPPOS: DB 












CURRENT Q700 PRINT HEAD POSITION 

IN 1/120 INCH INCREMENTS 

NUMBER. OF INCREMENTS TO MOVE Q70 

PRINT HEAD IN ADDITION TO CHARACTER 

MAX. NUMBER OF LPT COLUMNS 

COLUMN BEYOND WHICH THERE.. ARE NO MORE 

"COMMA FIELDS" 



A comma in a LPRINT statement causes the printhead to move to 
the beginning of the next 14 column field. If LPTPOS is 
greater than NLPPOS, a carriage return line feed sequence is 
executed before printing. NLPPOS is calculated by the 
following relation: 

NLPPOS=INT( ( (LPTLEN/14) -1) *14) 

LPTLST is used only by the 80LP printer. QPOS and QMOV 
are used only by the Q70. The user should not modify the 
PRTFLG flag since it is modified and. referred to in several 
places in BASIC. Changing it in a USR routine has 
unpredictable results. 

B. Start of LPT code. 



LPT3CD: JMP 
JMP 



FINLPT 
PRINTW 



body of LPT code 



The main body of LPT code is entered whenever PRTFLG is 
determined to be non-zero. The character to be output must be 
at the top of the stack. Upon exit from LPT code, the 
character' must be removed from the stack and should be loaded 
into the Accumulator. This is because BASIC checks the 
Accumulator for the last character printed. 

FINLPT is entered whenever 3ASIC returns to command 
level. FINLPT calls PRINTW for a carriage return/line feed 
sequence, if necessary, and resets PRTFLG to zero. 

PRINTW does the carriage return/line feed. 

FINLPT and PRINTW both return with zero loaded in the 
Accumulator and all the condition codes set to zero. 
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C. End of LPT code 

ENDLPT is the physical end of the lineprinter driver 
code. 

The following routines are used in with all terminal 
devices: 



IOCHNL: 


IOREST: LXI H, IOCHNL 

CALL HELPIO 

CALL STKINI 

JMP READY 



/DEPOSIT BOARD TYPE HERE 

; CHANNEL GETS DEPOSITED HERE. 

;GRAB POINTER TO IT 

;SET UP THE NEW CONSOLE DEVICE 

;MAKE STACK OK 

;AND TYPE *'OK" HOPEFULLY ON GOOD CONSOL 



To modify the I/O routines, stop the machine after 
loading BASIC and insert the changes using the front panel 
switches, or read in a tape containing the patches. Restart 
BASIC at location zero with all sense switches up. This will 
prevent BASIC from modifying the I/O routines. In general, 
these guidelines should be followed in writing I/O routines: 

1. Insert a JMP at TRYOUT to the custom output routine. Be 
sure the PSW that is saved on the stack when the routine 
is entered is preserved. Make sure all registers are left 
unchanged when the routine is exited. 

2. Insert a JMP at TRYIN to the custom input routine. Return 
the input character in the A register and do not change 
any of the other registers. The PSW may be changed. 

3. To modify ISCNTC, . insert a CALL to the custom poll 
routine. This routine returns a non-zero condition code 
setting if no character is present and zero if a character 
is present. The A register and the condition codes may be 
changed. 

4. To change the initialization of the 2SIO board, chanqe the 
"ADI 23Q" to "MVI A, XXX" where XXX is the new 
initialization bvte. 



To change the initialization of the 4PIO board, change the 
"MVI A,54Q" to a "MVI A, XXX" where XXX is the new 
initialization byte. 



Topatch in a 

LPTCOD-t 

which prints 

LPTCD2 

no 



new line printer driver, chanae the code at 
Lhat PRINTW is_3ls^_jiaXled-by-- th o routi n e- 
:n line feed. The code at 
J: the line orinter is 
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7. To recover from an incorrect CONSOLE command, deposit the 
board type in IOCHNL, the board type in IOCHNL+1, and 
start the machine at IOCHNL+2. 



Patching Disk BASIC - the PTD program. 

After Disk BASIC is loaded, deposit the desired patches 
in memory. Then examine and run PTD at location 54030 octal. 
After two or three seconds, the patched version of BASIC will 
be saved on disk. The save is complete when the Disk Enable 
light on disk drive zero goes out. 

To save a patched version of BASIC on a disk which did 
not previously contain release 4.0 Altai r BASIC, track must 
be copied from a 4.0 disk. 

PTD may also be used to save programs other than BASIC on 
tracks 0-4 of a diskette by loading the program after BASIC is 
loaded and running PTD. All memory locations between and 
46000 octal will be saved on tracks 0-4 on diskette zero. 
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APPENDIX M 
USING ALTAIR DISK 3ASIC 
An Example 



The following is a discussion of how to program a typical 
application in BASIC. The example is the MITS in-house 
inventory system which is designed to run on the followina 
hardware: 

Altair 8800b computer with 32K memory, PROM memory board 
with the Disk PROM Bootstrap loader and a 2SI0 serial 
I/O board 

Two disk drives 

24-line Lear-Sigler CRT terminal 

Line printer 

The most important part of the design for an application 
is setting up the files. Files that are correctly set up will 
be easy to use and maintain. Poorly set up files will be a 
perpetual headache, causing either an eventual rewrite or, 
more likely, abandonment of the system. 

The first listing at the end of the appendix, INVEN, 
contains modules from the main program in the inventory 
system. INVEN shows how the central" file (a random file) in 
the system is set up and how it is handled. The INVEN listing 
also shows the use of another random file and a sequential 
file. The CALC listing shows how to read programs as data 
files. CODE! is a partial listing of a program that will be 
read as a data file. 



The INVEN modules 
following features: 



listed were included to show the 



1. program startup initialisation and comments about the 
files used by the program (lines 1-35) 

2. what the complete program does (lines 60-1000) 

3. an example of how to modify records in a random file 
(lines 900-1040) 

4. an example of how sequential files are used (lines 
1800-1868 and 2700-2820) 

5. one approach to the problem of handling a random file that 
spans more than one disk (lines 2000-2030) 
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6. three subroutines (lines 300-340, 9000-9020 and 9200-9220) 
that are called by the INVEN modules. 



The function FNY (line 6) is used to round dollar 

amounts to thousandths of a cent. FNQ (line 7) is used to 

round quantities to thousandths and to convert single 
precision amounts to double precision. 

INV3 is fielded once in the program initialization, but 
INVl and INV2 are repeatedly fielded by calls to the 
subroutine at line 2000. The IF F>255 (line 60) avoids the 
possibility that the program can be stopped by an illegal 
function call at line 61. 

PUT statements are the very last statements executed in 
the Remove from Inventory module, the Add to Inventory module, 
etc. This prevents updating one file but not the other. 
(This could happen if PUT Z, Rl was at line 1010.) 

Line 2000 sets Z to 1 and Rl to N if the item wanted, N, 
is less than 2001. It sets Z to 2 and Rl to N-2000 if the 
item wanted is greater than 2000. Line 2020 then sets the 
pointers for the variables in the field statement to point 
into either the buffer for INVl or the buffer for INV2, 
depending on whether the item wanted is less than 2001 or 
greater than 2000. 



The CALC listing is a program which determines if 
are enough parts in inventory to meet projected demands. 
60 waits while the disk comes up to speed 
"ENABLE DISK 1" will not be printed on the 
100-140 input up to fifty different product 
number of each product to be built. Line 170 
each product that contains the parts required 
Lines" 220-250 build up a report heading, 



there 

Line 

so the message 

terminal. Lines 

codes and the 

opens a file for 

for the product. 

extracting the 



product description contained in line 10 of each file. 

Lines 120-150 accumulate the number of parts required for 
each product into the array Q. If more than 32767 of a part 
is required, a pointer is set in the array Q and the number of 
the part is accumulated in the array Q!. This maneuvering is 
necessary since the system does not have enough memorv to 
dimension Q as single precision instead of integer. 

The parts lists for a product are programs saved with the 
A option". Since they are programs, their maintenance is very 
easy. For example, suppose that part 1071 in the 8800b is too 
marginal and that from now on part 1173 should be used 
instead. With the parts lists disk mounted on drive 0, the 
following sequence will update the 8800b file: 
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LOAD "CODE1" 

160,1,1173 

SAVE "CODE1",0,A 

The programmer who is cramped for memory will find that 
programs can still be documented adequately if comments are 
set up as separate files. The memory used for variables when 
a program runs can be used for comments if the comments' are 
merged in when the program is to be listed. Alternatively, 
the program could be listed in two or more parts. Additional 
memory can be obtained by bringing 3ASIC uo without optional 
functions and with no files. 

The main inventory program is set up so that a carriage 
return typed in response to any prompt causes the program to 
dump the function descriptions on the CRT and to return 'to the 
FUNCTION NUMBER prompt. If the program were to be run on a 
printing terminal, instead of a 9600 baud CRT, it would not be 
set up to print the descriptions every time the ooerator 
wanted to get back to the FUNCTION NUMBER prompt. The list of 
function descriptions might be taped on the wall next to the 
terminal instead. 

Listing of INVEN 

1 DEFINT F-N 

2 DEFINT R 

3 DEFINT Z 

5 DEFDBL P 

6 DEF FNY#(Q8#)=INT(Q8#*A#+.5#)/A# 

7 DEF FNQ# (Q9!)=INT(VAL(STR$(Q9i) )*1000#+.5#)/1000# 

8 A$=MKD$ (0) :B$=MKS$ (0) :A#=100000# 

10 DIM Q${2) ,P$(2) 

11 ' 

INV1 ON DRIVE HOLDS ITEMS 1-2000 

INV2 ON DRIVE 1 HOLDS ITEMS 2001-40 00 

INV3 ON DRIVE 1 HOLDS SUMS LOGGED IN AMD OUT BY DEPARTMENT 

12 • 

WEKLYRST AND MONTHRST ARE WRITTEN WHILE THE WEEKLY, 
MONTHLY ACTIVE ITEMS LISTS ARE PRINTING; 

CONTAIN THE ITEM #S THAT NEED TO BE RESET; AND ARE READ BY 
THE WEEKLY, MONTHLY RESETS. 

14 ' 

Q$() <=> THREE ON HAND QTY FOR: P$() <=> THREE PRICES 
[P(0> OLDEST, P(l) NEXT OLDEST, Q(0)<>0 IF Q{1)<>0, 
Q(1)<>0 IF Q{2)<>0] 
D$ <=> DESCRIPTION LEFT$ (D$ ,3) =" $$$" <=> INACTVE ITEM # 

11$ <=> WEEKLY QTY IN 
12$ <=> MONTHLY QTY IN 
01$ <=> WEEKLY QTY OUT 
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02$ <=> MONTHLY QTY OUT 

T$ <=> REORDER LEVEL 

DI1$ <=> WEEKLY $ IN 

ID2$ <=> MONTHLY $ IN 

D01$ <=> WEEKLY $ OUT 

0D2$ <=> MONTHLY $ OUT 

17 ' 

DT1$ <=> WEEKLY DEPT $ TAKEN 

DX2$ <=> MONTHLY DEPT $ TAKEN 

DG1$ <=> WEEKLY DEPT $ GIVEN 

DY2$ <=> MONTHLY DEPT $ GIVEN 

20 OPEN "R",#1,"INV1" 

30 OPEN "R",#2,"INV2",1 

32 OPEN "R",#3,"INV3",1 

35 FIELD #3,8 AS DT1$,8 AS DX2$,8 AS DG1$,8 AS DY2$ 

60 PRINT :F=0: INPUT" FUNCTION NUMBER" ? F: IFF>255THEN63 

61 ON F GOTO 210,350,350,1900,600,900,1700, 
2700,2500,2300,2400,1880,2900' 

2 3 4 5 6 7 8 9 10 11 12 13 
14 15 16 

63 PRINT" 1 - ENTER NEW ITEM" 

64 PRINT" 2 - LIST ITEM ON CRT (SHORT FORM)" 

65 PRINT"3 - LIST ITEM ON CRT (LONG FORM)" 

66 PRINT" 4 - PRINT ITEMS ON LINE PRINTER 

67 PRINT" 5 - ADD TO INVENTORY" 

68 PRINT" 6 - REMOVE FROM INVENTORY" 

69 PRINT" 7 - PRINT WEEKLY DEPT DOLLAR RECORD ON LINE PRINTER 

70 PRINT" 8 - PRINT WEEKLY ACTIVE ITEMS LIST ON LINE PRINTER 

71 PRINT" 9 - WEEKLY RESET 

72 PRINT" 10- PRINT MONTHLY DEPT DOLLAR RECORD ON LINE PRINTER 

73 PRINT" 11- PRINT MONTHLY ACTIVE ITEMS LIST ON LINE PRINTER 

74 PRINT" 12- MONTHLY RESET 

75 PRINT" 13- RESET ORDER LEVELS 

76 PRINT" 14- PRINT LISTNG OF ITEMS NEEDING TO BE RE-ORDERED 

77 PRINT" 15- DELETE OLD ITEM 

78 PRINT" 16- ERRORS BACKOUT 
100 GOTO60 

298 ' 

SUB - INPUT PART # & GET RECORD 
* 

300 PRINT : PRINT :N=0: INPUT" PART NUMBER" ;N :TFN<1THENRETURN 
310 IFN>4000THENPRINT:PRINT"' '# TOO HIGH ' ' " :GOTO 300 
320 GOSUB2000:GETZ,R1 
330 IFLEFT$(D$,3)="$$$"THENPRINT: 

PRINT'"'NO INFORMATION ON PART ' ' " ;N:GOTO300 
340 RETURN 

890 ' 
* 

F*=6 - REMOVE FROM INVENTORY 

* 
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900 GOSUB300:IFN=0GOTO63 

920 DN=-1:INPUT"NUMBER OF ITEMS REMOVED FROM INVENTORY"? 

DN:IFDN=-1THEN63 
950 IFCVS (Q$ (0) ) +CVS (Q$ (1) ) +CVS (Q$ (2) ) <DNTHENPRIMT" 

ATTEMPT TO REMOVE MORE THAN ON HAND" : PRINT :GOT063 
960 D0=DN:P=0 
970 IFD0<CVS(Q$(0))THEN 

P=P+FNQ# (D0) *CVD (P$ (0) ) :LSETQ$ (0) =MKS$ (CVS"(Q$ (0) ) -D0) : "" 
GOTO1000 
980 P=P+FNQ#(CVS(Q$(0)))*GVD(P$(0)) :D0=D0-CVS (Q$ (0) ) ; 
LSETQ$(0)=Q$(1) :LSETQ$(1)=*Q$(2) :LSETQ$ (2) =B$ : 
LSETP$(0)=P$(1) :LSETP$(1)=P$(2) :LSETP$ (2) =A$ : IFD0THEN 
GOTO970 

1000 LSET01$=MKS$(CVS(01$)+DN) : LSET02$=MKS$ (CVS (02$) +DN) : 

LSETD01$=MKD$ (CVD (D01$ ) +P) :LSET0D2$=MKD$ (CVD (0D2$ ) +P) 
1020 GOSUB9200:IFC%=-1GOTO63 

1030 LSETDT1$=MKD$ (CVD (DT1$ ) +P) :LSETDX2$=MKD$ (CVD (DX2$ ) +P) 
1040 PUT3,C%:PUTZ,R1:GOTO900 
1790 ' 
* 

F=9 - WEEKLY RESET 

* 

1800 PRINT" 7 - WEEKLY DEPARTMENT RECORD 

1802 PRINT"8 - WEEKLY ACTIVE ITEMS 

1804 Z$="": INPUT" HAVE THE ABOVE BEEN LISTED FOR TODAY";Z$ 

1810 IFLEFT$(Z$,1)<>"Y"THENPRINT:PRINT 

"WEEKLY RESET NOT PERFORMED" :GOT063 
1843 0PEN"I",4,"WEKLYRST" 

1845 IFEOF(4)THENCLOSE4:KILL"WEKLYRST":GOT01862 
1850 INPUT#4,N:IF 1<=NANDN<=4000 THENGOSU32000 :GETZ , Rl 

ELSEPRINTN;"OQT OF BOUNDS. RESET ABORTED. ": END 

1855 LSETI1$=3$:LSET01$=B$:LSETDI1$=A$:LSETD01$=A$:PUTZ,R1 

1860 GOT01845 

1862 FORI=1TO20 

1864 GET3 , I : LSETDT1$=A$ :LSETDG1S=A$ : PUT3 , I 

1866 NEXT 

1868 GOTO60 

1999 * 
* 

SUB - GET Z,R1 FOR N AND FIELD TO INV1 , 2 
* 

2000 Z=1-(N>2000) :R1=N+(Z=2)*2000 

2020 FIELD Z,4 AS Q$(0),4 AS Q$(l),4 AS Q$ (2) , 3 AS P$(0), 
8 AS P$(l),8 AS P$(2),40 AS D$ , 4 AS 11$, 4 AS I2S , 
4 AS 01$, 4 AS 02$, 8 AS DI1$,8 AS ID2$,8 AS D01$,8 AS 0D2$ 

203 RETURN 

2690 ' 

* 

F=8,ll - WEEKLY, MONTHLY ACTIVE ITEMS LIST 
* 

2700 N=1:GOSUB2000:GOSUB2855 

2703 IFF=8THEN0PEN"0" , 4 , "WEKLYRST"ELSEOPEN"0" , 4 , "MONTHRST" 
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2705 IT#=0:OT#=0:TT#=0 
2710 FORI=1TO2000 

2720 GETZ,I:IFLEFT$ (D$ , 3) ="$$$"THEN2800 
-2723 Q0=CVS (Q$ (0) ) :Q1=CVS (Q$ (1) ) :Q2=CVS (Q$ (2) ) 
2725 IFF=8THENI!=CVS(I1$) :0!=CVS(01$) : I#=CVD (DI1$) :0#=CVD (D01$) 

ELSEI!=CVS(I2$) :0!=CVS(02$) : I#=CVD (ID2$ ) :0#=CVD (0D2$ ) 
2727 TT#=TT#+CVD (P$ (0) ) *Q0+CVD (P$ (1) ) *Q1+CVD (P$ (2) ) *Q2 
2730 IFI!+Ol=0THEN2800 
2733 PRINT#4,N+I-1 
2735 IT#=IT#+I#:0T#=0T#+0# 
2740 IFL9>59ANDKK=0THENGOSUB2850 
2750 LPRINTUSING"######";99999!+N+I; 

2770 LPRINTUSING"##,###,###";I! ,0! ,Q0+Q1+Q2 ,Q0+Q1+Q2+O!-I I ; 
2780 LPRINTUSING"$$, ###,###.##" ;I#,0# 
2790 L9=L9+1 

2795 KK=KK+1:IFKK=5THENLPRINT:L9=L9+1:KK=0 
2800 NEXT 

2810 IFN=1THENN=2001:GOSUB2000:GOTO2710 

2811 CL0SE4 

2813 LPRINT :LPRINTUSING" TOTAL INVENTORY COST =$$##,###,###.##" ;TT# 

2815 REM *GOTO2820 IN F=7,10 

2820 LPRINT:LPRINTUSING"TOTAL IN = $$##,###,###.##"; IT# 

2830 LPRINTUSING"TOTAL OUT =$$##,###,###.##" ;0T# 

2837 LPRINT:LPRINT 

2840 GOTO50 

2850 FORJ=L9T066:LPRINT:NEXT 

2855 IFF=8THENLPRINT"WEEKLY ,, ; :ELSELPRINT"MONTHLY" ; 

2860 LPRINT" ACTIVE ITEMS LIST" ; :GOSUB9000 

2865 LPRINTTAB (39) ; "STARTED" 

2870 LPRINT" ITEM # QTY-IN QTY-OUT ON-HAND MO-WITH 

DOLLARS-IN DOLLARS-OUT" 

2880 LPRINT :KK=0:L9=6: RETURN 

8990 ' 
* 

SUB - PRINT TODAY'S DATE 

* 

9000 IFTD$ = ,, "THENLINEINPUT"TODAY'S DATE ?" ;TD$ : IFTD$-" "THEN63 
9010 LPRINT" ";TD$ 
9015 LPRINT 
9020 RETURN 

9190 ' 

* 

INPUT DEPARTMENT # AND GET TOTALS 
* 

9200 C%=-1: INPUT" ENTER DEPARTMENT CODE" ;C% : IFC%=-1THENRETURN 

9210 IFK=C%ANDC%< = 20THENGET3,C%:RETURN 

9220 PRINT"INVALID CODE" :GOTO9200 

Listing of C0DE1 
5 C0DE1 
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10 PARTS LIST FOR: 8800B 

20 OCT 30,1976 

90 REM THIS IS THE START OF DATA 

100 ,11,1042 

110 ,3,1134 

120 ,4,1040 

130 ,1,1020 

140 ,1,1021 

150 ,1,1024 

160 ,1,1071 

170 ,1,1074 

180 ,1,2105 

190 ,24,348 

200 ,2,326 

Listing of CALC 

10 CLEAR600 

20 DEFIMT A-Z 

30 DIM CN(49) ,NU(49) ,Q(4000) ,Qi (200) 

40 CLOSE :UNLOADl 

50 INPUT"PLACE DISK WITH PARTS LISTS IN DRIVE 1. HIT RETURN" ;G$ 

60 FORK1=1TO5000:NEXT:MOUNT1 

90 LINEINPUT" TODAY'S MO/DA/YR " ;DT$ :H$ (0) =DT$+" PARTS AVAILABLE FOR:" 

INPUT QUANTITY OF EACH PRODUCT REQUIRED 
***** 

100 INPUT"CODE NUMBER (0 WHEN FINISHED) " ;CN (I) 

110 IF CN(I)=0 THEN 150 

120 IF CN(I)<1 OR 50<CN(I) THEN PRINT"INVALID CODE NUMBER": 

GOTO 100 

130 INPUT"NUM3ER OF UNITS TO BE MADE";NU(I) 

140 I=I+1:IF K50 THEN 100 

145 ' 

ACCUMULATE QUANTITY OF EACH PART REQUIRED 
***** 

150 FOR K=0 TO 1-1 
160 ONERRORGOTO610 

170 OPEN"I'* / #l,"CODE M +MID$(STR$(CN(K) ) ,2) ,1 
180 ONERRORGOTO0 

190 LINEINPUT#1,A$:IFA$ = *"'THEN190 
200 IFLEFT$(A$,3)="90 "THEN260 
210 IFLEFT$(A$,3)<>"10 "THEN190 
220 IFKTHENH$ (HK)=H$ (HK)+" ,"' 

230 HH$=STR$(NU(K))+STR$(CN(K) )+"=(" +MID$(A$, 20)+") "- 
•240 IFLEN(HH$)+LEN(HS(HK))>72THENHK=HK+1 
250 H$(HK)=H$(HK)+HH$:GOTO190 
260 ONERRORGOTO63 
270 IFEOF(1)THEN310 
230 INPUT #1,A,QN,PN 
290 IFQ(PN)<0THENQ! (-Q(PN) )=Q! (-Q(PN) )+NU(K)*QN 
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ELSEQ(PN)=Q(PN)+NU(K) *QN 
300 GOTO270 

310 ONERRORGOTO0 : CLOSE 1:NEXT K 
315 ' 

GET SECOND HALF OF INVENTORY BACK ON LINE, 
***** 

320 CLOSE :UNLOADl 

33 INPUT" 

PLACE INVENTORY DISK #1 IN DRIVE 1. HIT RETURN TO START REPORT" ;G$ 

340 FORI!*1TO5000:NEXT:MOUNT1 

360 OPEN"R",#2,"INVl" 

370 FIELD #2,4 AS Ql$,4 AS Q2$,4 AS Q3$,24 AS G$,40 AS D$ 

375 ' 

PRINT REPORT 

***** 

380 GOSUB570 

390 FOR 1=1 TO 4000 

400 IF Q(I)=0 THEN 530 

410 QQl-Q(I) :IFQ(I)<0THENQQ!=QI (-Q(D) 

420 IFL9>59ANDKK=0THENGOSUB560 

430 L9=L9+1 

440 RN=I 

450 IFK2000THEN460ELSERN=RN-2000 : IFFLAG=0THEN 

CLOSE2:OPEN"R",#2,"INV2 i ',l:FLAG=l: 

FIELD#2,4 AS Ql$,4 AS Q2$,4 AS Q3$,24 AS G$,40 AS D$ 
460 GET #2,RN 
470 IFLEFT$(D$,3)="$$$"THENLPRINTI+100000i ; 

*********** NO INFORMATION ON PART ********"•: 

LPRINTUSING"##, ######", *QQ!:GOTO520 
480 QH!=CVS(Q1$)+CVS(Q2$)+CVS(Q3$) :QDi=QHi-QQ! 
500 LPRINTI+1000001 ;D$;" "; 
510 LPRINT USING "##,######" }QQ I ;QH! ;QD i 
520 KK=KK+1:IFKK=5THENKK=0: LPRINT :L9=L9+1 
530 NEXTI: CLOSE: END 
560 FORK=L9T066: LPRINT: NEXT 
565 ' 

PRINT PAGE HEADING 
***** 

570 FORK=0TOHK:LPRINTH$(K) :NEXT 

580 LPRINT :LPRINTTAB (52) ; "NEEDED ON HAND EXCESS" : LPRINT 

590 KK=0:L9=5+HK: RETURN 

605 ' 

TRAP ROUTINE: BAD CODE NUMBER 

***** 

610 IFERR=53THENPRINT:PRINT"NO CODE" ;MID$ (STR$ (CN (K) ) , 2) ? " FILE" 

620 ONERRORGOTO0 

625 ' 

TRAP ROUTINE: ACCUMULATE INTO Q OVERFLOWED 

***** 

630 IFERRO6ORERLO290THENONERRORGOTO0 

640 NQ=NQ+l:Qi (NQ)=Q(PN)+NU(K) *QN:Q(¥N)=-NQ 

670 RESUME270 
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MID$ function . .. 80 

MKD$ 65 

MKI$ 65 

MKS$ 65 

MOD operator 39 

MOUNT' 52 

NAME 56 

NEW 71 

NEW in disk 60 

NEXT 22 

NOT 17 

NULL 71 

OCT$ 80 

Octal constants 12 

ON ERROR GOTO 35 

ON...GOSUB 22 

ON.. .GOTO 20 

OPEN 56 

OPEN, random files ...... 62 

Operators 15 

Operators, extended and disk . 33 

Operators, logical 16 

Operators, precedence of . . . 15 

Operators, relational .... 16 

Operators, string 30 

OR 17 

OUT • • 27 

PEEK 27 

PIP utility program ..... 124 

PIP, CNV command 126 

PIP, COP command 125 

PIP, DAT command 126 

PIP, DIR command 125 

PIP, INI command 124 

PIP, LIS command 125 

PIP, SRT command 125 

POKE 26 

POS 80 

Precedence, table of 15 

PRINT 23 

PRINT USING 46 

PRINT, disk 59 

Prompt string 23 

PTD program 136 

PUT 62 
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Random buffer 62 

Random File I/O 61 

Random files ." 57 

READ 24 

Remarks ...... 8 

RENUM 6 

Reserved Words 5, 91 

RESTORE 25 

RESUME 37 

RESUME NEXT 37 

RETURN 22 

RIGHT$ ..... 80 

RND 80 

RSET 66 

RSTLESS versions 1^8 

Rufaout 9,' 83 

RUN 72 

RUN, disk files 55 

SAVE 53 

Saving programs on paper tape 71 

Scientific notation ..... 11 

Sense switch settings .... 101 

Sequential File I/O 57 

Sequential mode 57 

SGN 80 

SIN . 8Q 

Single precision 11 

Space allocation 106 

Soace hints 107 

SPACE? 80 

SPC 81 

Special Characters ...... 82 

Speed hints 108 

SQR 81 

Statements 72 

Statements, extended ..... 32 

STOP '..... 60, 77 

STR$ 81 

String Literal ........ 5 

STRING? 81 

Strings 30 

Subroutines . 22 

•Subroutines, machine languaqe 112 

SWAP \ . 33 
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TAB • • 81 

TAN 81 

TROFF 33 

TRON 33 

Type of constants 11 

Type of variables 13 

Type, definition 5 

UNLOAD 52 

USR 81, 112 

VAL 81 

Variable types 13 

Variables 12 

VARPTR 81 

WAIT 26 

WIDTH 34 
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